👤
a fost răspuns

Elaborați un program ce conține o procedură care calculează aria cercului

Răspuns :

Marmota22

const

pi=3.14;

var

l,S,r:real;

begin

read(r);

l:=2*pi*r;

S:=pi*r*r;

writeln(l,' ',S);

end.



calculeaza si lungimea btw