Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Kakazabra
25.10.2021 12:43 •
Информатика
Массив состоит из 12 элементов(случайные числа от 3 до 10). найти произведение его элементов.
Показать ответ
Ответ:
mariacold
03.10.2020 15:02
Program p1;
const n=12;
var a:array[1..12] of integer;i:integer;p:biginteger;
begin
p:=1;
randomize;
for i:=1 to n do
begina[i]:=random(3,10);
end;
for i:=1 to n do
begin
p:=p*a[i];
end;
writeln(p);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
AnastasiaVolk534
27.12.2022 20:52
нада текст програми блок схему нужно записать задачу y=2(a+c)/3x. Ну не проходи мимо ❤️❤️❤️❤️...
thewinterstale
16.01.2021 10:23
Построить логическую схему по выражению: x1 и (не x2 или x3)...
LeaV
20.11.2020 14:59
Сколько атомов пропена на sp2 плоскости.и почему?...
ruan
25.06.2021 07:05
Обозначь спряжение глаголов крепко держат. легко дышишь. далеко видит. гонит волны. вертит колесо. зависит от погоды. терпит боль. ненавидишь ложь. внимательно смотришь....
Zhanelka1028
06.11.2022 10:23
Точка о центр окружности на которой лежит точки k ,l и p .известно что угол lkp= 68°и угол olk 25° найдите угол opk...
alexguzz55
25.06.2021 07:05
Составить план текста трудно построить дом. трудно летать к . но так же нелегко вырастить лес. те леса, которые ты видел, в которых гулял и собирал ягоды и грибы, посажены много-...
Severelinka
23.04.2022 11:14
Работа выхода электрона из поверхности металла равна 3 эв. определите частоту излучения, если скорость фотоэлектронов равна 4000 км/с. распишите решение ...
TamiDobro
03.11.2020 21:23
Нужны бухгалтерские проводки. остаток цемента 10 мешков по 150 р на сумму 1500р уплено 20 мешков цемента по 180 р на сумму 300 ндс 20% 600р итого 4200 отпущено со склада на выполнение...
afsanka98
25.01.2021 16:39
Вычислите площадь криволинейной трапеции ограниченной: осью ох,прямыми х=-1,х=2 и параболой у=9-х^2...
НекоТян124
24.11.2022 15:42
Написать план к этому сочинению: любовь бескорыстная,самоотверженная,не ждущая награды каждый человек по-разному понимает и воспринимает любовь. дело выбора: верить в нее или...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
const n=12;
var a:array[1..12] of integer;i:integer;p:biginteger;
begin
p:=1;
randomize;
for i:=1 to n do
begina[i]:=random(3,10);
end;
for i:=1 to n do
begin
p:=p*a[i];
end;
writeln(p);
end.