Напишите программу пожалуйста) паскаль
В конце последнее слово ШАГ

1

Ответы и объяснения

2014-03-05T11:18:36+04:00
Var x,y: integer;
begin
for x:=-7 to 7 do
begin
y:=abs(x*x-5*x-6);
writeln('x=',x,' y=',y);
 end;
end.