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

Cоставить алгоритм и начертить блок-сему решение задачи:

Найти площадь круга и длину его окружности, зная радиус круга

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

var r,s,l:real;
begin
write(radius=); read(r);
s:=pi*sqr(r);
l:=2*pi*r;
write(S=,s,;L=,l);
end.