40 баллов
Построить программу pascal
Вычислить значения функции
F(X) =x-sin(x-1) на отрезке [a, b] с шагом h
Построить программу pascal
Вычислить значения функции
F(X) =x-sin(x-1) на отрезке [a, b] с шагом h
More Questions From This User See All
Answers & Comments
var
a,b,h:integer;
function F(x:integer):real;
begin
F:=x-sin(((x-1)*pi)/180);
end;
begin
write('a: ');readln(a);
write('b: ');readln(b);
write('h: ');readln(h);
writeln;
while a<=b do
begin
writeln('При a=',a,' F(a): ',F(a):5:3);
a:=a+h;
end;
end.