Составить таблицу значений функции y=sin(x)-cos(x) на отрезке [a; b] с шагом h в паскалеАВС

uses crt; var x,y,a,b,h: real; begin      write('a: '); readln(a);      write('b: '); readln(b);      write('h: '); readln(h);      clrscr;     writeln('    x       y');      x:=a;      while x<=b do begin            y:=sin(x)-cos(x);            writeln(x:7:2,' ',y:7:2);            x:=x+h;      end; end.