Найдите площадь круга. Радиус вводится с клавиатуры. Записать все в паскаль
PROGRAM KRUG;
VAR R,S:REAL;
BEGIN
R:=1;
S:3.14*R*R;
WRITE LN(S)
END.
program Krug;var r,s:real;beginWriteln('Введите радиус круга:');read(r);s:=3.14*r*r;Writeln('Площадь круга:',s);end.или же так
Так
Поставь спасибо плиз)
S=pr^2 это твой ответ
и мне)