Question

Задача в Паскале: Составить таблицу значений функции у=5х-2 на отрезке от 1 до 20 в шагом в=2

Answer 1

var x,y,h:real;

Begin

  h:=2;

  x:=1;

  repeat

     y:=5*x-2;

     writeln(x:5,y:5);

     x:=x+h;

  until x>20;

End.