tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу нахождения
Составить программу нахождения произведения 20 введенных пользователем чисел.
Nastykaramova
1 23.06.2019 05:50
0
Ответы
runazh
02.10.2020 09:12
Var i,m:integer;
mass:array[1..20] of integer;
begin
for i:=1 to 20 do
read(mass[i]);
m:=mass[1];
for i:=2 to 20 do
m:=m*mass[i];
writeln(m);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
roma2233p08v96
07.06.2021 14:38
Какое логическое выражение эквивалентно выражению A Ù ¬(¬B Ù ¬C)?...
разетка1234
21.08.2019 08:30
1)постройте прямой код для числа 126. ответ запишите в шестнадцатеричном виде. 2)рассматривается 8-разрядная арифметика со знаком (используя дополнительный код). запишите...
Katya23232311
07.03.2019 21:00
Разработать блок схему для решения (составить программу вычисления суммы квадратов всех натуральных чисел от 1 до 20)...
DizzyWarriorr
07.03.2019 21:00
Сколько цветов можно максимально использовать для хранения изображения размером 350х200 пикселей, если объем страницы видеопамяти - 65 кбайт?...
Loliss
07.03.2019 21:00
Видеопамять имеет объем, в котором может храниться 4-х цветное изображение размером 300х200. какого размера изображение можно хранить в том же объеме памяти, если оно...
skyblue1
03.06.2019 16:00
Даны четыре различных целых числа. найти сумму тех чисел, которые больше 5. написать программу в packalabc.net...
Behheheh
03.06.2019 16:00
Составить блок-схему,возводящая в квадрат меньшее из чисел и умножающая на 2 большее....
Demirline
19.12.2020 20:10
Как создать ссылку в MS Access, чтобы она сама генерировалась на основе значения поля? Вот пример: У меня есть таблица, в ней три столбца: Марка авто , Модель авто , Гиперссылка....
peranyaanko
19.12.2020 20:06
6. Какое напряжение необходимо для работы оборудования, вид, характеристика?...
лиза4710
19.12.2020 20:05
Заданы фамилия, имя, возраст и рост учащихся. Если в секцию волейбола набирают ребят не старше 14 лет и ростом выше 165см, то сколько учеников могут в нее записаться?...
Популярные вопросы
Яка доля спіткала язичницьких ідолів після хрещення Володимира...
3
спросить и решить уравнения...
3
Складіть і запишіть твір-роздум за висловом В. Симоненка: Бо на свiтi...
3
Основной категорией этики как философской науки является: а) истина;...
1
Проанализируйте схему на тему Природные ресурсы , Составте текст-по-...
3
решить задачу. Длина актового зала 10 м, а ширина в 2 раза меньше....
1
Напишите вывод, что изменилось когда построили эти крепости...
1
Дан одночлен 10х2· 3 х у5 ·(−2) у3 а) приведите одночлен к стандартному...
1
7. Здійснити перетворення: Fe - FeCl3 - Fe(OH)3 - Fe203 - Fe(NO3)3...
1
ФОЛЬКЛОРНІ МОТИВИ слово о полку ігоревім • РИТУАЛЬНІСТЬ ДІЇ:• принцип...
3
mass:array[1..20] of integer;
begin
for i:=1 to 20 do
read(mass[i]);
m:=mass[1];
for i:=2 to 20 do
m:=m*mass[i];
writeln(m);
end.