Minggu, 28 Agustus 2022

MEMBUAT JARING-JARING KUBUS MENGGUNAKAN GEOGEBRA

Jaring-jaring kubus merupakan pemisahan bangun ruang kubus atau bangun ruang kubus yang dibuka dan diubah menjadi bentuk bangun datar yang masih berkaitan untuk beberapa sisinya dan apabila digabungkan atau disusun akan membentuk bangun ruang berbentuk kubus.

Untuk mempermudah dalam memahami bentuk jaring-jaring bangun ruang, dibutuhkan suatu alat peraga guna merealisasikan wujud jaring-jaring bangun ruang tersebut. Namun, karena teknologi berkembang sangat pesat, dalam membuat jaring-jaring bangun ruang selain menggunakan alat peraga konvensional dapat dilakukan dengan memanfaatkan aplikasi seperti geogebra yang hanya dengan satu klik saja sudah mampu menciptakan jaring-jaring bangun ruang bahkan mengubah jaring-jaring tersebut menjadi sebuah animasi.

Kali ini kita akan belajar cara membuat jaring-jaring kubus menggunakan aplikasi geogebra klasik. Jika teman-teman belum memiliki aplikasi tersebut di telepon genggam, laptop atau komputer, teman-teman bisa mengunduhnya terlebih dahulu. Untuk mengunduhan menggunakan laptop atau komputer. Caranya cukup dengan menulis unduh geogebra di mesin pencarian seperti chrome atau firefox, sedangkan untuk pengunduhan di telepon genggam, teman-teman dapat membuka aplikasi play store dan menuliskan nama aplikasi dalam kasus ini ialah aplikasi geogebra di kolom pencarian.

Tutorial membuat jaring-jaring kubus menggunakan geogebra:

1. Buka aplikasi geogebra lalu pilih “Polygon” kemudian gambarkan bangun datar berbentuk persegi dengan cara membuat titik-titik yang bersambung menjadi model persegi pada tampilan geogebra yang bergaris-garis.

2. Setelah membuat persegi, selanjutnya pilih tiga garis yang berada di pojok kanan atas lalu pilih “Perspectives” kemudian pilih “3D Graphics”.

3. Setelah dipilih 3D Graphic, maka tampilannya akan berbeda dengan sebelumnya, yakni menjadi tampilan yang seperti di bawah ini. Selanjutnya, pilih simbol berbentuk limas segi empat lalu pilih “Extrude to Prism”.


4. Setelah teman-teman memencet Extrude to Prism, selanjutnya ialah mengarahkan kursor pada bangun yang telah dibuat, maka akan muncul kolom pengisian Altitude seperti gambar di bawah ini yang harus diisi dengan tinggi kubus. Altitude ini ialah tinggi dari suatu bangun ruang, karena yang dibahas ialah bangun ruang kubus, maka panjang; lebar; dan tinggi memiliki ukuran yang sama. Untuk mengisi Altitude, teman-teman bisa memeriksa panjang rusuk bangun ruang kubus yang telah teman-teman buat. Pada tutorial ini, altitudenya 2 sebab sebelumnya bangun datar persegi yang telah dibuat pada langkah 1 memiliki panjang rusuk 2. Teman-teman bisa menyesuaikan altitude dengan panjang sisi persegi yang teman-teman buat.

5. Langkah selanjutnya ialah memilih simbol yang sama dengan langkah 3 lalu pilih “Net”. Setelah net dipilih, dilanjutkan dengan mengklik bangun ruang kubus yang telah dibuat, maka akan muncul gambar jaring-jaring kubus di sekitarnya.

6. Untuk menghilangkan gambar titik sudut dan rusuk pada kubus, caranya adalah dengan menempatkan kursor pada rusuk atau titik kubus lalu klik kanan kemudian hilangkan centang pada tulisan Show Object dengan cara klik “Show Object”.

7. Gambar jaring-jaring kubus ini bisa digerakkan atau dibuat menjadi animasi caranya ialah dengan memencet simbol play seperti di bawah ini.


Terima kasih, semoga bermanfaat

 

Minggu, 24 Juli 2022

Tutorial Membuat Program Segitiga Pascal dengan Input Banyak Level di MATLAB

Segitiga pascal ialah susunan angka yang berbentuk segitiga dan angka yang berada di puncak segitiga atau bisa disebut angka di baris pertama harus angka 1 kemudian pada baris kedua harus angka 1 dan 1. Untuk baris selanjutnya harus dimulai dan diakhiri dengan angka 1, sedangkan angka-angka yang berada di antaranya diperoleh dengan cara menjumlahkan dua bilangan yang berada di atasnya.

Sesuai dengan judul, kali ini kita akan membahas tentang cara membuat program yang mampu menampilkan segitiga pascal dengan input banyaknya level menggunakan aplikasi matlab. Jika teman-teman belum memiliki aplikasi matlab di laptop atau komputer, silakan untuk mengunduh dan menginstal aplikasinya terlebih dahulu.

Pada postingan ini, versi aplikasi matlab yang digunakan adalah versi 6.5, R2013a, dan R2017b. Sebenarnya menggunakan satu versi saja sudah cukup, tapi karena setiap versi pasti memiliki celah atau kekurangan sehingga perlu dilakukan upgrade oleh programmer agar tetap bisa berjalan dengan baik dan hal ini pasti akan memberikan perbedaan sebagai identitas setiap versi, seperti tampilan yang berbeda, fitur yang bertambah, dan sebagainya. Maka dari itu, terdapat kemungkinan jika kode program tidak bisa dijalankan pada versi tertentu. Bila versi matlab yang dimiliki tidak digunakan pada postingan ini, jika teman-teman berkenan silakan untuk mencoba mengganti tanda koma menjadi tanda titik atau sebaliknya karena terdapat beberapa versi matlab yang tanda komanya menggunakan simbol tanda titik bisa juga sebaliknya atau malah berbeda total.

Tujuan postingan ini menggunakan lebih dari satu versi matlab ialah untuk menambah referensi dan barangkali versi yang dimiliki teman-teman sama dengan versi yang digunakan pada postingan ini. Selain itu, juga berharap semoga dapat membantu teman-teman untuk memahami dan mampu mempraktikkan tutorial yang disampaikan.

Maaf karena bertele-tele, cuss ke tutorialnya.


KODE PROGRAM:

%Program Segitiga Pascal: prog_pascal.m

x=input('Masukkan jumlah level: ');

if x<1 %jika level negatif atau nol

    return

end

x=ceil(x); %pembulatan x

%bilangan bulat

disp('1') %tampilkan level -1

if x==1

    return

end

disp('1 1') %tampilkan level -2

if x==2

    return

end

P=[1 1];

for i=3:x

    for j=1:i-2

        q(j)=P(j)+P(j+1);

    end

    P=[1 q 1];

    disp(P) %tampilkan level -3 dan seterusnya

end

 

VERSI R2017b

1.  Tampilan awal.

2. Masukkan kode program pada bagian editor.

3. Pada bagian editor pilih Run untuk menjalankan program. Jika program belum disimpan, maka simpan terlebih dahulu dan tentukan lokasi penyimpanan lalu klik simbol Run.

4. Setelah di klik Run, hasil akan muncul di bagian Command Window. Masukkan level, misal 11 lalu enter dan akan muncul tampilan seperti di bawah ini.

5. Selesai, selamat mencoba.


VERSI R2013a

1. Tampilan awal.

2. Pada Home pilih New Script untuk membuka M-File atau Editor.

3. Masukkan kode program pada editor.

4. Pada bagian editor pilih Run. Sebelumnya simpan program dan tentukan lokasi penyimpanan lalu klik simbol Run.

5. Setelah di klik Run, hasil akan muncul di bagian Command Window. Masukkan level, misal 11 lalu enter dan akan muncul tampilan seperti di bawah ini.

6. Selesai, selamat mencoba.


VERSI 6.5

1. Tampilan awal.

2. Pilih M-File atau editor, simbolnya seperti gambar di bawah ini.



3. Masukkan kode program pada m-file.

4. Pilih simbol di bawah ini untuk menjalankan program. Sebelumnya simpan program dan tentukan lokasi penyimpanan lalu klik simbol di bawah ini.



5. Setelah di klik Run, hasil akan muncul di bagian Command Window. Masukkan level, misal 11 lalu enter kemudian akan muncul tampilan seperti di bawah ini.

6. Selesai, selamat mencoba.


Semoga bermanfaat, terima kasih...




Sabtu, 25 Juni 2022

Cara Membuat Tulisan Berjalan atau Bergerak di Delphi 7

Pada postingan kali ini, saya akan membagikan tutorial membuat teks bergerak atau berjalan dengan menggunakan aplikasi Borland Delphi 7. Biasanya tulisan berjalan ini dapat kita jumpai di televisi, website sampai di tempat umum seperti pusat perbelanjaan, jalan raya, dan supermarket. Fungsi running text sendiri ialah sebagai penyampaian informasi, media iklan, dan peringatan.

Untuk membuat text berjalan di Delphi 7 ini caranya sederhana dan mudah untuk diikuti. Perhatikan tutorialnya di bawah ini:

1. Buka aplikasi Delphi dengan menggunakan laptop/PC/komputer.

2. Klik “standard” lalu klik “A” sebanyak dua kali guna memunculkan kolom untuk menambah tulisan yang nantinya akan dijadikan running text. 

3. Setelah diklik “A” sebanyak dua kali, maka akan muncul “Label1” di form1.

4. Lalu klik label1 tersebut dan perhatikan pada kotak di pojok kiri bawah, yakni Object Inspector. Pada object inspector, klik “Properties” lalu klik “Caption” untuk mengubah tulisan Label1 menjadi tulisan yang nantinya akan dibuat berjalan. 

5. Setelah mengubah caption, maka tulisan label1 akan berubah. Sebagai contoh, pada tutorial ini saya membuat tulisan thank you. Jadi, tulisan label1 akan berganti menjadi tulisan thank you.

6. Tulisan thank you ini atau tulisan yang akan teman-teman buat dapat diubah warnanya, ukuran, dan juga jenis fontnya. Caranya sangat sederhana, yakni pada bagian properties klik “Font” lalu klik titik tiga di samping tulisan “(TFont)”.

7. Setelah diklik “titik tiga” tersebut akan muncul tampilan seperti di bawah. Teman-teman dapat mengkreasikan warna, ukuran, dan font tulisan sesuai keinginan atau tidak diubah sama sekali juga tidak apa-apa. 

8. Selanjutnya klik “System” yang terletak di samping kanan standard lalu klik simbol jam sebanyak dua kali. Simbol jam ini disebut timer yang bertujuan untuk mengatur suatu prosedur atau fungsi yang dijalankan pada interval waktu tertentu. Sebenarnya, sebagaimana fungsi timer pada umumnya, pada delphi ini timer juga berfungsi untuk mengatur waktu.

9. Setelah simbol jam di klik sebanyak dua kali, maka akan tampak tampilan seperti di bawah ini.Tulisan thank you di bawah ini tidak sama dengan gambar pada langkah 5 sebab sudah diubah font, ukuran, dan warnanya sesuai langkah nomor 7.

10. Kemudian timer tersebut diklik sebanyak dua kali lalu masukkan kode di bawah ini:

label1.Left := label1.left-100;

if label1.Left <1 then label1.left:=500

CATATAN: Angka 100 dan 500 yang ada pada kode di atas dapat diganti sesuai kehendak teman-teman. Kode diletakkan setelah “begin” dan sebelum “end;”.

11. Klik “File” yang terletak di pojok kanan atas lalu klik “Save All” dan tentukan lokasi penyimpanan untuk menyimpan program running text Delphi yang telah teman-teman buat.

12. Setelah project disimpan selanjutnya klik run (yang memiliki simbol seperti gambar di bawah) untuk melihat hasilnya.

13.  Setelah di run, maka program akan muncul seperti gambar di bawah ini dengan tulisan thank you yang berjalan dari kanan ke kiri. Karena ini gambar jadi tulisan thank you nya tidak bisa terlihat berjalan wkwk.


Demikian cara membuat teks berjalan atau running text dengan menggunakan Borland Delphi 7. Terima kasih, selamat mencoba dan semoga bermanfaat....

Jumat, 27 Mei 2022

Membuat Program Perkenalan Diri dengan Borland Delphi 7

Halo...ini tulisan pertama saya di blog. Postingan pertama ini, saya akan membahas cara membuat aplikasi salam kenal dengan Borland Delphi 7. Namun, sebelum membuat program perkenalan pastikan teman-teman sudah menginstal aplikasi Delphi 7 ya... kemudian simak tutorialnya di bawah ini:

1. Buka aplikasi Delphi 7 yang sudah diinstal di laptop atau komputer kemudian akan muncul tampilan seperti berikut ini:


2. Membuat desain form perkenalan diri dengan langkah-langkah sebagai berikut: 
Klik standard kemudian tambahkan komponen Label sebanyak 4 buah, Edit sebanyak 4 buah, dan Button sebanyak 1 buah.
Letak komponen yang perlu digunakan:

Klik simbol label, edit, dan button untuk menambahkan komponen tersebut dalam desain form perkenalan diri lalu atur tata letaknya sesuai kehendak hati.


3. Mengubah isi tulisan komponen-komponen form, misal seperti tabel di bawah ini.

Properties

Object

Value

Label 1

Caption

Program Perkenalan Diri di Delphi 7

Label 2

Caption

NIM

Label 3

Caption

Program Studi

Label 4

Caption

Nama

Label 5

Caption

Alamat

Edit 1

Text

Kosongi

Edit 2

Text

Kosongi

Edit 3

Text

Kosongi

Edit 4

Text

Kosongi

Button 1

Caption

Exit


4. Tampilan form setelah isi tulisannya diganti sesuai tabel pada nomor 3 (tepatnya kolom 3) menjadi sebagai berikut:

5. Setelah desain form selesai, langkah selanjutnya adalah memasukkan kode agar program perkenalan diri di Delphi 7 dapat dijalankan. Yang haus dilakukan pertama kali ialah klik Events yang terletak pada bagian Object Inspector. Lalu, klik OnCreate dan masukkan kode ini di bawah tulisan begin:

Edit1.Text:='Isi NIM';

Edit2.Text:='Isi Program Studi';

Edit3.Text:='Isi Nama';

Edit4.Text:='Isi Alamat';

 

6. Langkah selanjutnya, yaitu klik dua kali pada Button 1 Exit dan masukkan kode ini di bawah tulisan begin:

Close;

 

7. Setelah semua kode dimasukkan, maka naskah kode pada Unit1 akan menjadi seperti di bawah ini:

Jika terdapat perbedaan, hal tersebut bisa jadi karena penggunaan jumlah dan nama komponen. Silakan bisa disesuaikan sendiri dengan kebutuhan atau permintaan soal barangkali. Apabila yang ada pada tulisan ini hanya terdapat beberapa komponen yang sekiranya tidak persis sesuai dengan apa yang harus teman-teman kerjakan, monggo bisa ditambahkan...


unit Unit1;

 

interface

 

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls;

 

type

  TForm1 = class(TForm)

    Label1: TLabel;

    Label2: TLabel;

    Label3: TLabel;

    Label4: TLabel;

    Button1: TButton;

    Edit1: TEdit;

    Edit2: TEdit;

    Edit3: TEdit;

    Edit4: TEdit;

    procedure FormCreate(Sender: TObject);

    procedure Button1Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

 

var

  Form1: TForm1;

 

implementation

 

{$R *.dfm}

 

procedure TForm1.FormCreate(Sender: TObject);

begin

Edit1.Text:='Isi NIM';

Edit2.Text:='Isi Program Studi';

Edit3.Text:='Isi Nama';

Edit4.Text:='Isi Alamat';

end;

 

procedure TForm1.Button1Click(Sender: TObject);

begin

Close;

end;

 

end.

 

8. Selanjutnya klik File lalu Save All. Simpan project dan unit sebelum program dijalankan.

9. Setelah disimpan, program siap dijalankan dengan cara klik Run.


10. Setelah program dijalankan atau di run, maka akan muncul output seperti di bawah ini:

Klik button Exit untuk keluar dari program perkenalan diri Delphi 7.


Terima kasih, semoga bermanfaat…..

 

MEMBUAT JARING-JARING KUBUS MENGGUNAKAN GEOGEBRA

Jaring-jaring kubus merupakan pemisahan bangun ruang kubus atau bangun ruang kubus yang dibuka dan diubah menjadi bentuk bangun datar yang m...