Помогите написать вот эту программку в Pascal ABC (задачка 2.2.1)

Помогите написать вот эту программку в Pascal ABC (задачка 2.2.1)

Задать свой вопрос
2 ответа
Var
  x:real;
Begin
  x:=-5;
  repeat
      writeln('y = ',sqr(x));
      x:=x+0.5;
  until(xgt;5)
End. 
Program lol (input, output);
var I:integer;
a, x:real;
begin
x:=-5;
while x lt;=5 do
begin
a:=sqr(x);
writeln (a);
x:=x+0.5;
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт