Составьте программу нахождения S круга (** языке Паскаля)

Question

Составьте программу нахождения S круга (на языке Паскаля)

Answer 1

Program n_6896896;const p=3.14;var s, r: real;beginwrite('Введите r');readln(r);s:= p * sqr(r);writeln('s=', s)end.

Comments

Извиняюсь

---

program n_6896896; const p=3.14; var s, r: real; begin write('Введите r'); readln(r); s:= p * sqr(r); writeln('s=', s) end.

---

блин, ладно, сами расставите пробелы и переносы

---

ок, спасибо большое)