Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Напишите программу, которая подсчитывает площадь круга по формуле s=π*r²

Ответ оставил Гость

Var
S: Real;
R: Integer;
Begin
WriteLn(Введите радиус:); ReadLn(R);
S:= pi * sqr(R);
WriteLn(Площадь круга = , S);
ReadLn;
end.