👤

Elaborati un program Pascal care citeste de la tastiera raza unui cerc si afiseaza la ecran aria cercului.Formula C=pi*r^2

Răspuns :

type arie_cerc;

const pi:=3.14;

var r,arie:real;

begin

write('Introduceti raza cercului:');readln(n);

arie:=pi*(power(r,2));
writeln('Aria cercului este:',arie:4:2);

readln;
end.