Это что помогите как исправить???? ​

Question

Это что помогите как исправить???? ​

---

Answer 1

Program ...;

Var r, s, real;

Begin

Writeln(“”);

read (r);

s:=3.14*r*r;

Writeln(s);

End.