Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
7 / 7 / 2
Регистрация: 10.02.2017
Сообщений: 164
Записей в блоге: 1
1

Дано целое число N (>0). Найти сумму Sin(x) + Sin(2x) + … + Sin(Nx)

07.06.2017, 12:47. Показов 854. Ответов 6
Метки нет (Все метки)

А можно сделать чтоб одна строка все суммировала, или write(тут код). условие вв
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.06.2017, 12:47
Ответы с готовыми решениями:

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

Написать программу, вычисляющую сумму Y=sin(n/2) - sin(3n/4) + sin(5n/8)
Задание по методике преподавания в школах, задали вот это а я всего та на первом курсе и в школе...

вычислить с помощью цикла:sin(1)+sin(2)+sin(3)+...sin(n)
1.Длинная последовательность двузначных чисел вводится клавиатуры. Признаком конца ввода является...

Вычислить тремя видами (if , for , while)уравнение: (1-sin(0.1))+(1+sin(0.2))+...+(1+sin(1))
Вычислить тремя видами (if , for , while) уравнение: (1-sin(0.1))+(1+sin(0.2))+...+(1+sin(1)). ...

6
612 / 2881 / 244
Регистрация: 11.08.2016
Сообщений: 2,320
07.06.2017, 13:26 2
Pascal
1
2
3
4
5
6
7
nx:=0;
sum:=0;
for i:=1 to n do
  begin
  nx:=nx+x;
  sum:=sum+sin(nx);
  end;
0
126 / 124 / 107
Регистрация: 09.01.2017
Сообщений: 1,644
07.06.2017, 19:22 3
Не совсем верно
Pascal
1
2
3
sum:=0;
for i:=1 to n do 
  sum:=sum+sin(i*x);
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
30922 / 20233 / 7887
Регистрация: 22.10.2011
Сообщений: 35,120
Записей в блоге: 6
07.06.2017, 22:03 4
Цитата Сообщение от Zwelenewskiy Посмотреть сообщение
Не совсем верно
С чего бы? Какая разница, умножить x на i, или добавить его к nx ровно i раз?
0
126 / 124 / 107
Регистрация: 09.01.2017
Сообщений: 1,644
07.06.2017, 23:43 5
Цитата Сообщение от Ivandur Посмотреть сообщение
nx:=nx+x;
Тогда я не понял,как это связано с циклом...
0
7 / 7 / 2
Регистрация: 10.02.2017
Сообщений: 164
Записей в блоге: 1
08.06.2017, 00:11  [ТС] 6
Нужно шото делать...
0
126 / 124 / 107
Регистрация: 09.01.2017
Сообщений: 1,644
08.06.2017, 08:52 7
HaydoSpeed, шо-шо: проверьте оба варианта,возьмите тот,который работает
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.06.2017, 08:52

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Вычислить N=sin(a)+sin(2a)+sin(3a)+.+sin(17a)
Вычислить N=sin(a)+sin(2a)+sin(3a)+...+sin(17a)

Циклом «пока» вычислить сумму ряда 1/sin 1+1/sin 1+sin 2+...+1/sin 1+...sin n
1/sin 1+1/sin 1+sin 2+...+1/sin 1+...sin n

Для заданного числа x распечатать числовую последовательность: sin(x), sin(sin(x), sin(sin(sin(x), …
var x,z:integer; y:real; begin readln(x); y:=abs(sin(x)); while y>0.01 do begin ...

Вычислить первое из чисел sin(x), sin(sin(x)), sin(sin(sin(x))), ... , меньшее по модулю 10^-4
1)Вычислить y - первое из чисел sinx, sin sinx,sin sin sinx,..., меньшее по модулю 10^-4 ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.