Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
popovapp26
30.04.2022 14:07 •
Информатика
Дан массив, состоящий из 10 элементов, найти произведение элементов массива
Показать ответ
Ответ:
valeriybalybin
10.09.2020 08:53
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Матем ИЗ "...\Отделы\Числа\";
ПЕР
массив: РЯД 10 ИЗ ЦЕЛ;
сч, произв: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(массив[сч]) - 1 ВЫП
массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 100));
Вывод.ЧЦел("%d ", произв, 0, 0, 0)
КОН;
произв := 1;
ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
произв := произв * массив[сч]
КОН;
Вывод.ЧЦел("^Произведение = %d.", произв, 0, 0, 0)
КОН Задание.
0,0
(0 оценок)
Популярные вопросы: Информатика
SashaKromberg
20.04.2022 20:04
Как это сделать воше ? ( заранее...
влюбленыйотличник
13.11.2021 12:51
У яких випадках доцільно розміщувати зведену таблицю на кількох сторінках...
Zoolog851
15.04.2023 11:35
Порівняйте довжину двійкового коду текстового повідомлення Людина без друзів - що дерево без коріння, створеного в текстовому редакторі Блокнот, під час збереження його з...
vikioria
20.03.2022 11:31
1. Берілген ақпараттық нысандардың ақпараттық сипатта- маларын беріңдер:а) тақырып бойынша эссе;ә) геометриялық тапсырмалар;б) тарих пәнінен реферат....
CEVA55555
17.11.2020 00:48
1.Структура информатики 2.Формы существования окружающего мира (пояснения, примеры) 3.Роль компьютера в информатике 4.Что понимают под ИТ (информационными технологиями)?...
Julia13662004
23.01.2021 06:45
Построить таблицу истинности для логического выражения...
ksyu5551
21.11.2021 17:01
с заданием. Если где я написал неправильно исправьте. Желательно в степенях двойки...
nastya291204061012
15.11.2020 03:32
МНОГО 1.Структура информатики 2.Формы существования окружающего мира (пояснения, примеры) 3.Роль компьютера в информатике 4.Что понимают под ИТ (информационными технологиями)?...
LyusiaG
06.08.2021 18:40
Составить инверсию ( отрицание ) числа 95, и перевести в двоичную, восьмеричную, шестнадцатиричную СС...
mmmmmaaaaruuu69
02.05.2022 02:46
Чему равно наименьшее основание позиционной системы счисления х, при котором: 255ₓ = 405ₙ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Матем ИЗ "...\Отделы\Числа\";
ПЕР
массив: РЯД 10 ИЗ ЦЕЛ;
сч, произв: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(массив[сч]) - 1 ВЫП
массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 100));
Вывод.ЧЦел("%d ", произв, 0, 0, 0)
КОН;
произв := 1;
ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
произв := произв * массив[сч]
КОН;
Вывод.ЧЦел("^Произведение = %d.", произв, 0, 0, 0)
КОН Задание.