PROGRAM KALKULATOR FISIKA

Pseudocode

Progam kalkulator_fisika

{ Progam mengenai kalkulator fisika }

Input: vawal, t, s, a, h, pilihan, rumus, g

Declaration

vawal, t, s, a, h, pilihan, rumus:double

g=9,8:double

Description

Begin

Println ("----------KALKULATOR FISIKA----------");

Println();

Print("PILIH PERHITUNGAN:");

Println();

Println("1. Kecepatan Gerak Jatuh Bebas");

Println("2. GLBB Kecepatan Akhir");

Println("3. GLB Kecepatan");

Println("4. Waktu Gerak Jatuh Bebas");

Println();

Writeln("Masukan Rumus Yang Diinginkan : ");

Read(pilihan);

Writeln();          

if (pilihan==1){

Read(if1)

Println("Menghitung kecepatan Gerak Jatuh Bebas");

Println("Rumus: sqrt2*g*h");

Writeln("h : ");

Read(h)                   

rumus = Math.sqrt(2*g*h);

Read(rumus);

Println("Hasil : "+rumus);

             

else if (pilihan==2){

Read(if2)

Println("Menghitung kecepatan akhir GLBB");

Println("Rumus: vawal + (a*t)");

Writeln("vawal : ");

Read(vawal);

Writeln("a : ");

Read(a);

Writeln("t : ");

Read(t);

rumus = vawal + (a*t);

Read(rumus);

Println("Hasil : " +rumus);

else if (pilihan==3){

Read(pilihan3);

Println("Menghitung kecepatan GLB");

Println("Rumus: s/t");

Writeln("s : ");

Read(s);

Writeln("t : ");

Read(t);

rumus = s/t;

Read(rumusst);

Println("Hasil : "+rumus); }

else if (pilihan==4){

Read(pilihan4);

Println("Menghitung waktu Gerak Jatuh Bebas");

Println("Rumus: Math.sqrt(2*h/g)");

Writeln("h : ");

Read(h);

rumus = Math.sqrt(2*h/g);

Read(rumus2*h);

Println ("Hasil : "+rumus);

else

println(“ERROR ERROR ERROR”);

End

FLOWCHART

LISTING PROGRAM

HASIL PROGRAM DARI LISTING DIATAS