Question

Информатика 10 класс 50 баллов​

Answer 1

1. var
2.  x: real;
3. begin
4.  while x <= 10 do
5.    begin
6.      Writeln('y = ', (x * x) + 1);
7.      x := x + 0.2;
8.    end;
9. end.