— -Вычислить значения функций -f(x) -и -g(x) на отрезке [a,b] с шагом -h.
F(x)=ctgx-lnx- — -g(x)=etg(x-2)— — -[1,5.5]- — -h=0,5-
Program func-
Uses crt-
Var x,x0,xm,f,g,h:real-
Begin
— — — — — — — — Readln(x0,xm,h,)-
x:=x0—
while x>-=xm do begin
f:=cos(x)/sin(x)-ln(x)-
g:=exp(sin(x-2)/cos(x-2))-
writeln(‘f=’,f:8:4)- — — writeln(‘g=’,g:8:4)- — — writeln(‘x=’,x:8:4)-
x:=x+h-
end-
Категория: Циклы |
Дата: 08.11.12