Question

с клаваиатуры вводится диаметр окружности, напишите программу, выводящую площадь круга

Answer 1

Ответ:

var d, s: integer;

begin

read(d) ;

s:=2*3,14*(sqr(d/2));

writeln('Площадь круга равна ', s)

end.

Объяснение: