Answered by : panicky-peafowl-redejawl4nxz

program Luas_Lingkaran;
const pi=3.14;
var r : real; luas : real;
begin write ('Masukan Jari-jari = ');read(r); luas:=pi*r*r; writeln('Luas = ',luas:4:2);
end.

Source : https://kelasprogrammer.com/contoh-program-pascal-sederhana/#Program_Menghitung_Luas_Persegi_Panjang | Last Update : Mon, 15 Nov 21