Program Volume Balok (Turbo Pascal)

Hay sobat blogger

Kali ini gw mau ngshare cara membuat program sederhana , di turbo paskal ..

Program sederhana tersebut adalah , Program Volume balok

Cara untuk membuat program tersebut sangatlah simple, kalian hanya harus mengetahui dasar-dasar dari Turbo pascal..

Berikut adalah kode untuk membuat program Volume Balok

Program Volume_Balok

Uses crt;

                P,l,t,volume: integer;

Begin

                Clrscr;
                Write(‘Masukan Panjang= ‘);readln(p);
                Write(‘Masukan Lebar= ‘);readln(l);
                Write(Masukan Tinggi= ‘);readln(t);
                volume :=p*l*t;
                writeln(‘Volume Balok Tersebut Adalah=’,volume);readln(volume);
                readkey;

End.

Kalian tinggal ketik kode tersebut di TP kalian , dan Jreng Jreng..
Program Volume Balok piun selesai …

Cat.

Jika kalian ingin mengubah kode berikut menjadi program yang lainnya , kalian hanya mengganti beberapa kode diatas , seperti variabelnya dll.

Semoga Berhasil ^^