Page 45 - Pemrograman Dasar kelas X

P. 45

Bab 1 Pengenalan bahasa Pemrograman 41

..............................................................................................................................................
..............................................................................................................................................
..............................................................................................................................................

3. Berikut ini program untuk perhitungan keliling lingkaran.
a. Lengkapilah program berikut ini, program membaca inputan jari-jari dan menampilkan
hasil perhitungannya.

Program VolumeKerucut;

Uses crt;
Var phi, r, t,Volume : Real;
Begin
Clrscr;

phi := ....... ;
write(‘......................................................................’); {meminta inputan jari-jari}

readln(............); {membaca nilai jari-jari}
write(‘.....................................................................’); {meminta inputan tinggi}
readln(‘...........); {membaca nilai tinggi}n

Volume:= ....................................; {menghitung volume}
Writeln(...................................................................); {mencetak output}

Readln;
End.

b. Untuk mengetahui kebenarannya salin kedalam Free Pascal

Jawab:
a. Program Keliling_lingkaran;
..............................................................................................................................................

..............................................................................................................................................

40 41 42 43 44 45 46 47 48 49 50