Предмет: Информатика,
автор: shilyaev19991
Помогите написать вот эту программу в Pascal ABC (задача 2.2.1)
Приложения:
![](https://files.topotvet.com/i/9bd/9bd1fb65c9f59898a91e629ed9997fdf.jpg)
Ответы
Автор ответа:
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.
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.
Автор ответа:
0
Var
x:real;
Begin
x:=-5;
repeat
writeln('y = ',sqr(x));
x:=x+0.5;
until(x>5)
End.
x:real;
Begin
x:=-5;
repeat
writeln('y = ',sqr(x));
x:=x+0.5;
until(x>5)
End.
Похожие вопросы
Предмет: Математика,
автор: vivovaleriya85
Предмет: Алгебра,
автор: Аноним
Предмет: Право,
автор: alionaostapenko22
Предмет: Алгебра,
автор: roy311