Составить программу вычисления значений функции F(x) на отрезке [a,b] с шагом h. Результат представить в виде таблицы, первых столбец которой – значения аргумента, второй – соответствующие значения функции. Программу составить двумя способами: с использованием цикла с предусловием и с использованием цикла с постусловием. F(x) ctg x+ 1

var a,b,h,x,x1,x2:real;function F(x:real):real;beginF:=cos(x)/sin(x)+1;end;beginwriteln('Функция: F(x)=ctgx+1');write('Введите крайние точки отрезка: '); readln(x1,x2);write('Введите шаг: '); readln(h);writeln('|   x   |  F(x) |');writeln('_________________');if x1>x2 then begina:=x2; b:=x1; end else begin a:=x1; b:=x2; end;x:=a;while x<=b dobeginwriteln('|',x:7:3,'|',f(x):7:3,'|');x:=x+h;end;end.