Предмет: Информатика, автор: shilyaev19991

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

Приложения:

Ответы

Автор ответа: guslyakov98vaddam
0
program lol (input, output);
var I:integer;
a, x:real;
begin
x:=-5;
while x <=5 do
begin
a:=sqr(x);
writeln (a);
x:=x+0.5;
end;
end.
Автор ответа: m0nclous
0
Var
  x:real;
Begin
  x:=-5;
  repeat
      writeln('y = ',sqr(x));
      x:=x+0.5;
  until(x>5)
End. 
Похожие вопросы
Предмет: Математика, автор: vivovaleriya85