Помогите написать вот эту программу в Pascal ABC (задача 2.2.1)
Помогите написать вот эту программу в Pascal ABC (задача 2.2.1)
Гость
Ответ(ы) на вопрос:
Гость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
x:real;
Begin
x:=-5;
repeat
writeln('y = ',sqr(x));
x:=x+0.5;
until(x>5)
End.
Не нашли ответ?
Похожие вопросы