в задаче два шага 1 и 0.5 или один 1.05 ???
Для шага 1
var x,y:integer;
begin
for x:= -7 to 7 do begin
y:=5*x-3
writeln(x,' ',y);
end;
end.
Для шага 0.5
var x,y:real;
begin
x:= -7;
while x<=7 do begin<br>y:=5*x - 3;
writeln(x,' ',y);
x:=x+0.5;
end;
end.
Если шаг 1.05, то во втором варианте пишем x:=x+1.05 (вместо x:=x+0.5; )