Помогите пожалуйста))
Составить алгоритм,печати,таблицы значений,функций y=5x-2 на отрезке [1;20] с шагом h=2

Напишу программуProgram pr;uses crt;Var x, y:real;Beginx:=1;While x<=20 do          Begin               y:=5*x-2;Writeln('x=', x:6:2, 'y=', y:6:2);x:=x+2;          end;readln;end.