Nama : Febianti Amira Rahmadani
Nrp : 2413 100 130
Jangan salah, sebagai mahasiswa teknik fisika, kita tidak hanya mempelajari tentang ilmu ilmu yang berbasis kefisikaan dan keteknikan saja. Tetapi di Kurikulum 2009 semester 2 Teknik Fisika ITS, kita juga di beri mata kuliah pemrograman komputer. Mata kuliah ini memiliki tingkat kesulitan yang tinggi tetapi sangat seru dan membuat ketagihan bagi sebagian mahasiswa.
Kali ini, kelas kami di beri tugas untuk membuat program dengan menggunakan software MatLab R2009a. Dan kali ini saya akan berbagi kepada blogger cara membuat program kuis dengan MatLab R2009a.
Tujuan saya membuat program ini adalah agar kedepannya para dosen dapat memanfaatkan software MatLab untuk kuis mata kuliah supaya bisa mendukung upaya go green dan paperless. Program kuis ini menampilkan contoh soal soal fisika beserta pembahasan dan jumlah nilai yang didapatkan.
Saya akan menampilan listing program,flowchart,dan tampilan program setelah di run. Selamat Mencoba ^-^
Listing Program
input(' WELCOME TO THIS GAME ')
input(' ')
clc;
disp(' Program Kuis FISIKA by')
disp(' Febianti Amira Rahmadani');
disp(' 2413 100 130') ;
disp(' Teknik Fisika ITS');
disp('============================');
disp(' ');
disp('--** soal kuis terdiri dari soal pilihan ganda --**');
disp('----** 1.soal pilihan ganda **----');
disp('----** 2.exit **----');
k=0;
n= input(' masukan pilihan anda (1…2)——-> ')
if n==1;
for A=1
disp('1. Sebuah mobil sedan bergerak dengan kelajuan 90 km.jam–1 dan mobil ambulans bergerak dengan kelajuan 72 km.jam–1 saling mendekati. Mobil ambulans membunyikan sirine dengan frekuensi 660 Hz. Jika cepat rambat bunyi di udara 350 m.s–1, maka frekuensi sirine yang didengar oleh sopir mobil sedan adalah Hz');
A=800;
B=750;
C=700;
D=640;
E=540;
f=B;
disp ('A 800');
disp ('B 750');
disp ('C 700');
disp ('D 640');
disp ('E 540');
d1=input('masukkan jawaban anda = ');
disp ('Pembahasan : ');
a=input('Frekuensi Sumber=660');
b=input('Kecepatan Sumber=72');
c=input('Kecepatan Pendengar=90');
d=input('Kecepatan Udara=350');
disp('Rumus=(Kecepatan Udara+Kecepatan Pendengar)/(Kecepatan Udara-Kecepatan Sumber)*Frekuaensi Sumber');
if (d1) == B;
input('************* benar ***************');
else
input('salah');
end
if d1 == B;
input (' skor ditambah 10 ');
k=k+1;
else
input(' skor dikurangi 10 ');
k=k-1;
end
for A=2
disp('2. Berkas cahaya dengan panjang gelombang 5.000 Å dijatuhkan pada dua celah dengan d = 2 × 10–2 mm pola interferensi yang ditangkap pada layar 1 m dari celah. Jarak antara 2 garis terang yang berdekatan adalah…cm (1 Å = 10–10 m');
A=1;
B=2.5;
C=5;
D=10;
E=20;
g=B;
disp ('A 1');
disp ('B 2.5');
disp ('C 10');
disp ('D 10');
disp ('E 20');
c1=input('masukkan jawaban anda = ');
disp ('Pembahasan : ');
h=input('Panjang Gelombang=5000A');
i=input('Jarak Layar ke Celah=1m');
j=input('Jarak Antara Dua Celah=2*10^-2');
disp('Rumus=Panjang Gelombang*Jarak Layar ke Celah/Jarak Antara Dua Celah');
if c1 == B;
input('************* benar ***************');
else
input('salah');
end
if c1 == B;
input (' skor 10 ');
k=k+1;
else
input(' kurangi 10 ');
k=k-1;
end
end
end
end
k=10*k;
disp(['SELAMAT NILAI ANDA ',num2str(k)]);
if n==2;
exit
end
Flowchart dari program ini yaitu
Berikut adalah tampilan dari listing program setelah di Run
Tekan Tombol Enter,maka akan muncul
Nah, setelah itu kita disuruh memilih untuk mengentry angka 1 atau 2, bila kita memilih angka 1 maka kita akan masuk kedalam program. Dan secara otomatis soal kuis juga akan muncul. Lalu kita tinggal memilih jawaban yang tertera. Setelah itu kita entry lagi maka akan muncul pembahasan beserta skor anda. bila jawaban benar maka skor bertambah 20 dan apabila jawaban anda salah maka skor tidak akan berkurang maupun bertambah. Seperti berikut
Program akan berjalan terus hingga soal selesai dikerjakan. Bila soal selesai dikerjakan maka akan muncul jumlah skor yang anda dapat.
Namun apabila anda memilih angka 2 maka anda akan keluar dari program
