Дано натуральное число N. Вычислить S=sin x+ sin sinx +...+sin sin....sin x

@Zyzz89 · Регистрация: 16.12.2013

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

Дано натуральное число N. Вычислить S (составить программу с использованием операторов While и Repeat)
S=sin x+ sin sinx +...+sin sin....sin x n-раз

@volvo · 18.12.2013, 20:11

Pascal

var
   i, n : integer;
   X, s, p : double;
 
begin
   write('N = '); readln(n);
   write('X = '); readln(X);
 
   p := X; s := 0;
   i := 1;
   while i <= n do
   begin
      p := sin(p);
      s := s + p;
      i := i + 1;
   end;
   writeln(s:12:7);
 
   p := X; s := 0;
   i := 0;
   repeat
      i := i + 1;
      p := sin(p);
      s := s + p;
   until i = n;
   writeln(s:12:7);
end.

@Zyzz89 · 18.12.2013, 20:51 **[ТС]**

спасибо огромное

@Zyzz89 1 / 1 / 0 Регистрация: 16.12.2013 Сообщений: 11
		1
	Дано натуральное число N. Вычислить S=sin x+ sin sinx +...+sin sin....sin x 18.12.2013, 16:32. Показов 5824. Ответов 2 Метки нет (Все метки) Дано натуральное число N. Вычислить S (составить программу с использованием операторов While и Repeat) S=sin x+ sin sinx +...+sin sin....sin x n-раз 0

@Zyzz89 1 / 1 / 0 Регистрация: 16.12.2013 Сообщений: 11
	18.12.2013, 20:51 [ТС]	3
	спасибо огромное 0

Опции темы

Дано натуральное число N. Вычислить S=sin x+ sin sinx +...+sin sin....sin x

Решение