Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.58/154: Рейтинг темы: голосов - 154, средняя оценка - 4.58
1 / 1 / 0
Регистрация: 05.12.2011
Сообщений: 10

Дано натуральное число n. Вычислить cos1/sin1 x cos1+cos2/sin1+sin2 x....x cos1+...+cos n/sin1+...sin n

17.12.2011, 15:45. Показов 32221. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
2. Дано натуральное число n. Вычислить cos1/sin1 x cos1+cos2/sin1+sin2 x....x cos1+...+cos n/sin1+...sin n
1
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
17.12.2011, 15:45
Ответы с готовыми решениями:

Дано натуральное число n. Вычислить: 1/sin1+1/(sin1+sin2)+.+1/(sin1+sin2+.sinn)
Дано натуральное число n. Вычислить: 1/sin1+1/(sin1+sin2)+...+1/(sin1+sin2+...sinn)

Вычислить y=sin1+sin1.1+sin1.2+...+sin2. Цикл с параметром
Вычислить y=sin1+sin1.1+sin1.2+...+sin2 пожалуйста всю программу напишите)

P=(cos1! + sin2!)(cos3! + sin4!) . (cos(n-1)! + sin(n)!)
P=(cos1! + sin2!)(cos3! + sin4!) ... (cos(n-1)! + sin(n)!) написать программу с использованием for

3
3 / 3 / 4
Регистрация: 03.11.2012
Сообщений: 5
04.11.2012, 00:30
Лучший ответ Сообщение было отмечено Niva как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var n:i integer;
k,c,s:real;
q:stribg;
begin
writeln('BBeguTe n ');
readln(n);
k:=1;
c:=0;
s:=0;
for i:=1 to n do 
begin
c:c+cos(i);
s:=s+sin(i);
k:=k*(c/s);
end;
writeln('Результат=',k:0:5);
writeln('Для выхода нажмите q');
readln(q);
until q='q';
end.
И можно вопросик? Ты где учишься?)
3
0 / 0 / 0
Регистрация: 14.06.2021
Сообщений: 1
17.11.2021, 07:36
end.
0
3410 / 1829 / 489
Регистрация: 28.02.2015
Сообщений: 3,696
20.11.2021, 16:38
Цитата Сообщение от Erishkrisis Посмотреть сообщение
end.
? Вы о чем?
В коде repeat - нехватает. Тем более теме 100 лет в обед.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
20.11.2021, 16:38
Помогаю со студенческими работами здесь

Вычислить значение выражения cos2(sin1/z)
Помогите решить срочно, буду очень признателен: 2. cos2(sin1/z) (cos2 - косинус в квадрате, sin1/z - синус 1 делить на z) нужен код...

Дано натуральное число N. Вычислить: (1/sin1)*(1/sin1+sin2)*.*(1/sin1+sin2+.+sinN)
Дано натуральное число N. Вычислить: (1/sin1)*(1/sin1+sin2)*...*(1/sin1+sin2+...+sinN) Помогите пожалуйста с программой var s,...

Вычислить sin1+sin1
Вычислить sin1+sin1.5+...+sin10

58. Описати функцію Cos1(x,eps) для знаходження наближеного значення функції cos(x): [cos(x) = 1 – x2 / 2! + x
Поможіть будьласка рішить до завтра.. Дуже нада.. екзамен просто.. Зарані дякую.. Описати функцію Cos1(x,eps) для знаходження...

Вычислить Cos1/sin1+(cos1+cos2)/(sin1+sin2)+(cos1+cos2+cos3)/(sin1+sin2+sin3)+(cos1+cos2+cos3+.. .+cosn)/(sin1+sin2+sin3+...+sinn)
Помогите плиз с программой фортран а точнеее с одним примерчиком . Мучаюсь в написании уже несколько дней. Вообщем дано такое задание:...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru