MENGHITUNG VOLUME TABUNG DENGAN PASCAL

MENGHITUNG VOLUME TABUNG DENGAN PASCAL


Berikut adalah cara menghitung volume tabung
menggunakan pascal.

1.Programnya

program volume_tabung;
uses crt;
const phi=3.14;
var
   r,t,v:real;
begin
     clrscr;
     writeln('Program Hitung Volume Tabung');
     write('Masukkan jari jari alas tabung=');readln(r);
     write('Masukkan tinggi tabung=');readln(t);
     V :=phi*r*r*t;
     writeln('Volume tabung    =',V:2:2);
     readln;
end.

2.Gambarnya



3.Hasilnya


Komentar

Postingan populer dari blog ini

TABEL DISTRIBUSI FREKUENSI DATA JAMAK, NILAI MEAN, ,MEDIAN, MODUS, QUARTIL DAN DESIL

PSEUDO-CODE PEMBAYARAN TAGIHAN UNTUK PELANGGAN PT PLN