Технология выполнения индивидуальных заданий. Часть 1 - 17 стр.

UptoLike

Составители:

Рубрика:

else

begin

y:=sin(x)/cos(x); write(y:12:8)

end;

if(x<0)or (abs(x)<eps) or(abs(x-4)<eps) then

writeln(' - ')

else

begin

z:=x-2*sqrt(x); writeln(z:12:8)

end;

x:=x+h

end

end.

Тестовые примеры

1) a = -1.5707963, b = 2, h = 0.31415926, eps = 0.0000001

Таблица результатов

x y z

-1.570796 - -

-1.256637 -3.07768331 -

-0.942478 -1.37638187 -

-0.628319 -0.72654251 -

-0.314159 -0.32491969 -

0.000000 0.00000000 -

0.314159 0.32491969 -1.23940468

0.628319 0.72654251 -1.04491856

0.942478 1.37638187 -1.00085261

1.256637 3.07768331 -1.01485810

1.570796 - -1.06856792

1.884956 -3.07768387 -1.16155065