Построить таблицу для функции y=ax+b где x принимает значение 0,5;1;1,5;2;2,5;3 Паскаль...

Question

Построить таблицу для функции y=ax+b где x принимает значение 0,5;1;1,5;2;2,5;3
Паскаль while

Answer 1

Const
dx=0.5; {шаг изменения x}
var
y,a,x,b:real;
begin
x:=0.5; {начальное х}
readln(a,b);
      while x<=3 do<br>            begin
               y:=a*x+b;
               writeln('x: ',x:4:2,'  y:  ',y:4:2);
               x:=x+dx;
            end;
end.