составить программу вычисления суммы по вот этой формуле

@marinee · Регистрация: 07.10.2013

Author24 — интернет-сервис помощи студентам

помогите пожалуйста с информатикой,не могу разобраться
Составить программу вычисления:1+tgx+tg^2(x)/2!+tg^3(x)/3!+tg^4(x)/4!... Расчёт везти до тех пор, пока член ряда по модулю не станет меньше заданной точности e. Подсчитать число слагаемых. Значения Х и e задать вводом.
в паскаль;(

@Samhain · 28.10.2013, 16:27

marinee,

Pascal

var x,e,s,si:real;
    i:integer;
begin
  write('x = ');readln(x);
  write('e = ');readln(e);
  s:=1;si:=1;i:=0;
  repeat
    inc(i);
    si:=si*sin(x)/cos(x)/i;
    s:=s+si;
  until si<e;
  writeln('s = ',s:0:10);
  readln
end.

@marinee 0 / 0 / 0 Регистрация: 07.10.2013 Сообщений: 13
		1
	составить программу вычисления суммы по вот этой формуле 28.10.2013, 15:48. Показов 1369. Ответов 1 Метки нет (Все метки) помогите пожалуйста с информатикой,не могу разобраться Составить программу вычисления:1+tgx+tg^2(x)/2!+tg^3(x)/3!+tg^4(x)/4!... Расчёт везти до тех пор, пока член ряда по модулю не станет меньше заданной точности e. Подсчитать число слагаемых. Значения Х и e задать вводом. в паскаль;( 0

	28.10.2013, 16:27

составить программу вычисления суммы по вот этой формуле

Решение