program pascal Menghitung luas sebuah lingkaran, dimana diameter lingkaran merupakan masukan/inputan dari
user.
Jawaban :
Pseudocode :
Program Luas_Lingkaran
Deklarasi
Const
Phi = 3.14
Var
D, L : real
Algoritma
Read (D)
L ← 0.25 * Phi * D * D

Progr am :
Program Luas_Lingkaran;
Const
Phi = 3.14;
Var
D,L : real;
Begin
Write (’Masukkan Diameter Lingkaran : ’);
Read (D);
Writeln (D);
L := 0.25 * Phi * D * D;
Writeln (’Luas Lingkaran: ’, L);
End.