Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
archakova65
29.09.2020 04:57 •
Информатика
Вычислить : (1+cos0.1)(1+cos0.+cos10)
Ответ:
геймер40
06.10.2020 03:21
Var
P:real;
A:integer;
Begin
P:=1;
For A:= 1 to 100 do
P:=P*(1+Cos(A/10));
WriteLn('P = ',P);
End.
Результат работы программы:
P = 2.79308459159613E-38
0,0
(0 оценок)
Популярные вопросы: Информатика
dribinl41
14.02.2023 14:26
Як намалювати сніговика у програмі Idle Python ?...
Elika34
18.02.2020 07:11
C++ Определить количество разных элементов одномерного массива.(Пример:Нам дан массив:1 2 1В нём 2 элемента: 1 и 2;)...
helloiSashA
28.02.2023 07:24
Системы счисления по ! 63в10 140в10 371в10 10в10 841в10...
йцуячс2
07.07.2022 14:45
Укажите через запятую в порядке возрастания все основания систем счисления, в которых запись числа 84 оканчивается на 14....
dimon786
24.01.2021 14:52
Водномерном массиве, заданным рандомными числами и состоящем из 10 вещественных элементов, вычислить: сумму элементов массива, расположенных между первым и последним положительными...
олька9992
24.01.2021 06:19
Определите значение переменной b после исполнения данного алгоритма a : = 3; b : = –2; a : = b – a * 2; b : = 240 / a * b; b : = a + b;...
помогиииитееее2233
24.01.2021 06:19
Составить блок схему ввод и вывод const sz = 100; // размер массива var a: array [1..sz] of integer; n: integer; // количество элементов в массиве i: integer; begin write( введите...
grekorim1998a
11.07.2022 05:05
Не вычисляя, определи, какие из данных выражений имеют равные значения:...
littlecat123
29.10.2022 18:42
как думаете, можно ли сказать из указанного графика, как в Швеции меняется продолжительность дня в декабре? почему? ( внизу - месяца, вверху - продолжительность дня в минутах)...
MiFanMF
17.01.2023 16:14
Проанализируйте представленную ситуацию и опишите правильные, на Ваш взгляд ответы на вопросы работодателя - Итак, как Вы уже знаете, в ряде отделов нашего магазина есть вакантные...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
P:real;
A:integer;
Begin
P:=1;
For A:= 1 to 100 do
P:=P*(1+Cos(A/10));
WriteLn('P = ',P);
End.
Результат работы программы:
P = 2.79308459159613E-38