Написать программу в паскале!
Написать программу при помощи процедуры, которая по известному радиусу возвращает в основную программу значения площади круга и длины окружности.
Входящие данные; R (радиус)
Выходящие данные: S (площадь), L (длинна окружности).

Procedure Pl (R:integer;var p:real)
begin
p:=3,14*R*R;
end;
procedure length (R:integer;var l:real);
begin
l:=3,14*R*2;
end;

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку