Ответ:
var d, s: integer;
begin
read(d) ;
s:=2*3,14*(sqr(d/2));
writeln('Площадь круга равна ', s)
end.
Объяснение:
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var d, s: integer;
begin
read(d) ;
s:=2*3,14*(sqr(d/2));
writeln('Площадь круга равна ', s)
end.
Объяснение: