var
a,b,h,x,y:real;
begin
writeln(‘Введите начальное значение, шаг, конечное значение’);
readln(a,h,b);
x:=a;
while x y:=0.5/tan(x/4)+4;
writeln(x:7:3,y:10:5);
x:=x+h
end
end.
Введите начальное значение, шаг, конечное значение
-5 0.5 5
-5.000 3.83386
-4.500 3.76106
-4.000 3.67895
-3.500 3.58244
-3.000 3.46329
-2.500 3.30698
-2.000 3.08476
-1.500 2.72976
-1.000 2.04184
-0.500 0.02086
0.000 Infinity
0.500 7.97914
1.000 5.95816
1.500 5.27024
2.000 4.91524
2.500 4.69302
3.000 4.53671
3.500 4.41756
4.000 4.32105
4.500 4.23894
5.000 4.16614
Источник: znanija.site
Вычислить значения функции F(x), на отрезке [a;b] с шагом h — Паскаль(Pascal)-CF
Программа вычисления значений функции F(x), на отрезке [a;b] с шагом h=0,2. F(x)= -cos2x.
Построение таблицы значений функций в EXCEL
var x,a,b,h,f:real; begin writeln(‘Введите a