MENGHITUNG LUAS VOLUME KERUCUT MENGGUNAKAN PROGRAM TURBO PASCAL

LANGKAH-LANGKAHNYA YAITU : 

1.  SCRIP YANG PERLU DI MASUKAN KE DALAM APLIKASI TURBO PASKAL 

Program Menghitung_luas_volume_kerucut;

uses windos, wincrt;

var V, R, T   : real;

begin

clrscr;

writeln ('program ini di buat oleh :');

writeln ('NAMA : HENDRIK WIJAYA');

writeln ('NIM : AFD 109 005');

writeln ('=============================');

writeln ('Mengitung Luas Volume Kerucut');

writeln ('=============================');

writeln ('Jari-jari : ');

readln (R);

writeln ('Tinggi    : ');

readln (T);

V:=pi*R*R*T*(1/3);

writeln ('Volume Kerucut= ',V:2:2);

readln;

end.


2.       SETELAH SELESAI JALANKAN APLIKASINYA,
3.       MASUK KE BAGIAN MENU BAR  “RUN ATAU CTRL+F9”. (UNTUK MELIHAT HASILNYA)

4.       SELAMAT MENCOBA.

UNTUK LEBIH JELASNYA ANDA BISA DOWNLOAD SCRIP YANG SUDAH
SAYA BUAT KE DALAM TURBO PASCAL
KLIK DISINI  UNTUK DOWNLOAD