Запрограммируйте пример, у меня выдает постоянно «ожидался порядковый тип»

Question

Запрограммируйте пример, у меня выдает постоянно «ожидался порядковый тип»

---

Comments

Pascal?

Answer 1

Var n:real; i:integer;
begin
     readln(n);
     for i := 1 to 5 do
     begin
          n := n + 2;
          n := sqrt(n);
     end;
     writeln(n);
end.