Найдите площадь круга. Радиус вводится с клавиатуры. Записать все в паскаль

Question

Найдите площадь круга. Радиус вводится с клавиатуры. Записать все в паскаль

Answer 1

PROGRAM KRUG;

VAR R,S:REAL;

BEGIN

R:=1;

S:3.14*R*R;

WRITE LN(S)

END.

Comments

program Krug;var r,s:real;beginWriteln('Введите радиус круга:');read(r);s:=3.14*r*r;Writeln('Площадь круга:',s);end.или же так

---

Так

---

Поставь спасибо плиз)

Answer 2

S=pr^2 это твой ответ

Comments

и мне)