hai semuaaaa..
seneng banget hari ini kita bisa ketemu lagi. hari ini kita mau publish program kalkulator fisika. kalkulator ini khusus buat menghitung alat optik ajaaa, yaitu masalah menghitung fokus, kacamata untuk penderita miopi dan kacamata untuk penderita hipermetropi. kalkulator ini dibuat gara-gara kami berempat (read:dinda, afie, osi, gegik) pake kacamata hehehe
kalkulator ini membantu kita yang lagi belajar alat optik, biasanya SMP, SMA dan anak-anak kuliah semester awal. rumus-rumus yang dipakai juga sama seperti rumus dasar yang digunakan dalam perhitungan manual. rumus akan ditampilkan di pseudocode dan flowchart dari program ini.
Program ini menggunakan metode perulangan if-else dan while-do . sehingga kita dapat menggunakan secara berkali-kali tanpa harus bolak-balik me-running program ketika kita mengetik "YA"
Happy Reading, guys!!
PSEUDOCODE KALKULATOR ALAT OPTIK
Header
Kalkulator_fisika_untuk_menghitung_berbagai_rumus_alat_optik
Deklarasi
s,
s1, pp, pr : double;
PPn
:double;
pilihan, coba : string
Deskripsi
Begin
writeln(“********************************************”);
writeln(“***
***”);
writeln(“*** KALKULATOR ***”);
writeln(“*** Alat Optik – Mata ***”);
writeln(“*** ***”);
writeln(“********************************************”);
writeln(““);
writeln("Apa yang akan anda
hitung ?");
writeln(“1. Fokus pada mata
Normal");
writeln("2. Kekuatan lensa
pada mata hipermetropi");
writeln("3. Kekuatan lensa
pada mata miopi");
writeln("Yang ingin dihitung :");
read(pilihan);
if
pilihan :”1” then
writeln(“-------------Mencari Fokus Pada Mata Normal-------------”);
writeln(“”);
write(“jarak benda (cm) : “);
read(s);
write(“jarak bayangan (cm) : “);
read(s1);
writeln(“Fokus :
“ +(s*s1)/(s+s1)+ “ cm”);
writeln(“_____________________________________________”);
writeln(““);
else
if
pilihan :”2” then
writeln(“----Mencari Kekuatan Lensa pada
Mata Hipermetropi---”);
writeln(““);
writeln(“jarak normal :
“+PPn );
write(“titik dekat :
“);
read(pp);
writeln(“Kekuatan lensa : “ +(100/25 - 100/pp)+ “ Dioptri”);
writeln(“______________________________________________”);
writeln(““);
else
if
pilihan:”3” then
writeln(“--------Mencari Kekuatan Lensa
pada Mata Miopi--------”);
writeln(““);
write(“titik jauh :
“);
read(pr);
writeln(“kekuatan
lensa :
“ +(100/pr)+ “ Dioptri”);
else
writeln(“maaf,
kode yang anda masukkan salah.”);
writeln(“------------------------------------------------------------------“);
writeln(“Mau
coba lagi?? [YA/TIDAK]”);
read(coba);
if
coba:"TIDAK" then
writeln("~~TERIMAKASIH TELAH
MENGGUNAKAN KALKULATOR CATVARIMSATI~~");
whilecoba:"YA"
do
writeln("Yang ingin dihitung : ");
read(pilihan);
ifpilihan:"1"
then
writeln(“ Fokus pada mata normal");
writeln ("");
write("jarak benda :
" );
read(s);
write("jarak bayangan : " );
read(s1);
writeln("Fokus :
" +(s*s1)/(s+s1)+ " cm");
writeln("_________________________________________________");
else
ifpilihan:"2"
then
writeln("--Mencari Kekuatan
Lensa pada Mata Hipermetropi--");
writeln("");
writeln("jarak normal :
"+PPn );
writeln("titik dekat :
");
read(pp);
writeln("Kekuatan lensa :
" +(100/25 - 100/pp)+ "
Dioptri");
writeln("__________________________________________________");
else
ifpilihan:"3"
writeln("------Mencari
Kekuatan Lensa pada Mata Miopi------");
writeln("");
write("titik jauh :
");
read(pr);
writeln("kekuatan lensa :
" +(100/pr)+ " Dioptri");
else
writeln("maaf, kode yang
anda masukkan salah.");
writeln("Mau coba lagi??
[YA/TIDAK]");
read(coba);
ifcoba:"TIDAK"
writeln("~~TERIMAKASIH TELAH
MENGGUNAKAN KALKULATOR FISIKA CATVARIMSATI~~");
End.
screnshot console program
screnshot console program
screenshot flowchart program
1 komentar:
Ada juga kalkulator fisika step by step terbaik, kunjungi
https://scizeta.com
Posting Komentar