Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
PaFaS123
31.03.2021 23:45 •
Информатика
Среди 30 элементов числовой последовательности 3-3 * cos (3 * n * n) выведите на экран: произведение положительных элементов
ПАСКАЛЬ!
Ответ:
veselskih1998
12.10.2020 14:45
begin
SeqGen(30, n -> 3 - 3 * Cos(3 * n * n), 1)
.Where(p -> p > 0).Product.Print
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Анастасия8383
20.04.2021 16:39
Что такое стиль текста?как изменяется изображение текста после применения стиля...
RyashenkoNastya
15.09.2022 09:10
Определи получения графического цифрового изображения, выбрав верные ответы. -северный мост -получение по IP-адресу -получение из сети Интернет -сканирование...
polyhovichvikto
12.06.2022 09:38
Написать программу рисования зелёного круга на красном фоне...
vikakruchko1405
12.06.2022 09:38
Найдите сумму квадратов всех чисел от 1 до 20 с шагом 1...
Marchendro77
09.03.2020 22:26
По информатике визуал бейсик. тенге надо перевести в рубль, доллар и в евро . заранее...
Dimamysixin
02.04.2021 02:41
Определить сколько слов в заданной строке начинаются на букву а . pascal...
egorshlyahov12p0dhm9
02.04.2021 02:41
Укажите устройство вывода информации клавиатура; монитор; мышь: микрофон; сканер...
bondarsofia
02.04.2021 02:41
Что относится к прикладным программам...
Potterhead01
02.04.2021 02:41
Стереть символ слева от курсора можно клавишей shift : delete : back space : enter...
Cole21
21.02.2020 12:17
Дана числовая последовательность: 1,4,7,10, какое число состоит на 20м месте? а) 58 в) 59 с) 60 д) 61...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
SeqGen(30, n -> 3 - 3 * Cos(3 * n * n), 1)
.Where(p -> p > 0).Product.Print
end.