Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 29.01.2016
Сообщений: 8

Вычислить произведение

01.02.2016, 12:45. Показов 761. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
program lab6;
var P:real;
k,N:integer;
begin
P:=1;
N:=30;
for k:=1 to N do begin
if (k<6) then P:=P*(sqr(sin(k))+cos(k)) else
if (6<=k) and (k<=10) then P:=P*0 else
if (k>10) then P:=P*(sqr(cos(k))+sin(k))
end;
writeln ('P:=', P:5:10);
readln();
end.
https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
\prod_{k=1}^{N}a_k\text{  npu }a_k=\begin{cases}\sin^2k+\cos k & \text{, } k<6\\ 0 & \text{, } 6\leq k\leq 10 \\ \cos^2k+\sin k & \text{, } k>10 \end{cases}<br />

N = 30
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
01.02.2016, 12:45
Ответы с готовыми решениями:

Вычислить произведение минимальных элементов четных столбцов. Где произведение будет кратно 7, поменять местами первую и последнюю строки
Даны массивы A{30,20},B{40,50} - целых чисел. Вычислить произведение минимальных элементов четных столбцов. В том массиве, где произведение...

Вычислить произведение
Дано натуральное число n. Вычислить: P=\left(1-\frac{1}{2^2} \right)\left(1-\frac{1}{3^2} \right)...\left(1-\frac{1}{n^2} \right),\...

Вычислить произведение i/(i^2)
Вычислить: \prod_{I=2}^{15} I/I^2

1
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
01.02.2016, 13:39
В задании видимо опечатка и оно стало идиотским, поскольку умножение на 0, всегда дает 0.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
01.02.2016, 13:39
Помогаю со студенческими работами здесь

Вычислить произведение
Составить программу с использованием операторов цикла. Данные для вычисления должны вводиться с клавиатуры. При необходимости, выполнить...

Вычислить произведение (1+1)(2+1).(n+1)
вычислить произведение (1+1)(2+1)...(n+1) :help:

Вычислить произведение
b=\prod_{i=1}^{15}\frac{ln|2i-x|}{ix+1}

Вычислить произведение
произведение sin(1)*sin(2)*…*sin(n)

Вычислить произведение
. Вычислить произведение: xx2...xN


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru