Question

Через программы Паскаль создайте площадь круга и длину окружности.

Answer 1

Задание несколько расплывчатое, но скорее всего, подойдет такое решение:

var r,d,p: real;
begin  
writeln('введите радиус');
readln(r);  
d:= 2*pi*r;  
p:=pi*r*r;
writeln('площадь = ',p);  
writeln('длина окружности = ',d)
end.