Помогите плиз с заданием номер 1
Var x ,y: integer;
begin
for x:=-4 to 4 do
begin
y:=2*x*x*x-7*x;
writeln(При x = , x, y = , y);
end;
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var x ,y: integer;
begin
for x:=-4 to 4 do
begin
y:=2*x*x*x-7*x;
writeln(При x = , x, y = , y);
end;
end.