Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Napol28
21.06.2021 13:15 •
Информатика
Дан массив, состоящий из 10 элементов, найти произведение элементов массива
Ответ:
vugarjalilovp0ci9p
10.09.2020 08:53
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Матем ИЗ "...\Отделы\Числа\";
ПЕР
массив: РЯД 10 ИЗ ЦЕЛ;
сч, произв: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(массив[сч]) - 1 ВЫП
массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 100));
Вывод.ЧЦел("%d ", произв, 0, 0, 0)
КОН;
произв := 1;
ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
произв := произв * массив[сч]
КОН;
Вывод.ЧЦел("^Произведение = %d.", произв, 0, 0, 0)
КОН Задание.
0,0
(0 оценок)
Популярные вопросы: Информатика
bidak03
04.09.2020 14:53
велосипедистка мала проїхати 60 км. пісня першого дня їй залишилось проїхати половину того, що вже проїхала. скільки кілометрів залишилося проїхати велосипедистці?...
помогите1170
04.11.2020 17:10
Каким человеком представлен нам Алексей в повести детство Максим Горький...
KLIFFEKATERINA
04.11.2020 17:10
Вегетативное размножение луковицы...
Zeerorrrrrr
14.07.2021 07:05
-0,1+(0,45)=-3,2-3,4=4,2-(1,7)=-35-(-72)=-3,7+(-7,7)=...
sofiya84
26.05.2022 02:46
(1)с годами мои стихи делались менее нарядными,и из них постепенно начала выветриваться экзотика.(2)она придаёт жизни ту долю необыкновенности,которая необходима каждому юному...
даша3549
03.01.2021 06:40
Карта про историчне минуле...
Александраlove1
05.12.2021 07:37
Назови тебе известные клетки крови....
arinasmail1
28.04.2022 21:41
Ежедневные занятия греков кратко, чуть больше пол страницы ...
115544
19.01.2020 03:25
Біологія 6 клас костіков и др. конспекты по 34 и 35 параграфу...
Rake4
29.12.2020 06:07
При каких значениях а уравнение х²-(а+5)х+9=0 не имеет корней...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Матем ИЗ "...\Отделы\Числа\";
ПЕР
массив: РЯД 10 ИЗ ЦЕЛ;
сч, произв: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(массив[сч]) - 1 ВЫП
массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 100));
Вывод.ЧЦел("%d ", произв, 0, 0, 0)
КОН;
произв := 1;
ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
произв := произв * массив[сч]
КОН;
Вывод.ЧЦел("^Произведение = %d.", произв, 0, 0, 0)
КОН Задание.