tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дан массив c()натуральных чисел.найти
Дан массив c()натуральных чисел.найти произведение элементов массива
ladakorobova
2 20.09.2019 12:20
0
Ответы
danko6kotov6alegro
21.08.2020 12:25
Var C:array [ 1..5]of integer;
i,S:integer;
begin
randomize;
for i:=1 to 5 do begin C[i]:=random(100);
Wruti(C[i],' ');end;
for i:=1 to 5 do S:=S+C[i];
Writeln('произведение элементов массива=',S);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Kseniacаt
25.03.2021 11:37
Дано четырехзначное число. Определить: а) кратно ли ПРОИЗВЕДЕНИЕ eгo цифр трем; 6) кратно ли числу а произведение его цифр.(именно произведение, а не полсто четырёхзначное число)...
Malinka961
25.03.2021 11:34
Python Создайте класс Student с параметрами: int id; String name; String surname; double gpa; Обязательно создайте конструктор. Создайте функцию getStudentData(); Данный метод...
GoldenAbzud
19.05.2019 00:00
Вбеспроигрышной лотерее разыгрывается 10 комплектов маркеров, 10 альбомов, 2 книги, 3 циркуля. определить вероятность того, что выиграла книга...
gulya101
19.05.2019 00:00
Компьютер загадывает число из диапазона от 1 до 100 и предложил пользовтелю его отгадать игра продолжается до тех пор пока число не будет отгаданным составте программу...
ztv1978
18.05.2019 23:50
Составьте алгоритм приготовления каши из топора....
Soto350
18.05.2019 23:50
Составить программу вычерчивания букв т,н...
missm0541
18.05.2019 23:50
Нужно составить программу на паскале авс вот по этой запросить сторону равностороннего треугольника а)периметр б)площадь в)радиус описанной окружности...
krivorotovadara
18.05.2019 23:50
Сообщение записано с алфавита, содержащего 8 символов. каково количество информации (информационый объём) одного символа (в битах)? сообщение, записанобуквами128-символьного...
BD20051
18.05.2019 23:50
Найти сумму квадратов всех целых чисел от 10 до 15. !...
annadarbinyan1
18.05.2019 23:50
Дан трехзначное число n и целое число k. напишите программу подсчитывающую сумму...
Популярные вопросы
Сочинение-рассуждение на тему природа и мы...
1
Птицам птицы приносят пользу и радость. в тёплое время года птицы сами находят...
3
Сумма всех коэффициентов в уравнение реакции,схема которой al+o2=al2o3 есть...
1
Какие государственные должности в афинах схемы...
2
Напишите смешное сочинение как я первый раз села на пони...
3
Какого склонения слова тумана,лугу....
2
Найдите угол арн, где р-точке на окружности, ав- диаметр, рн-перпендикуляр,...
3
Из москвы в питер идёт поезд со скоростью 50км\ч. на каком расстоянии от москвы...
2
Стихотворение а.шибаева слова,слова,слова .о чём хотел сказать автор запиши...
2
Учому полягає формування символив тексту?...
2
i,S:integer;
begin
randomize;
for i:=1 to 5 do begin C[i]:=random(100);
Wruti(C[i],' ');end;
for i:=1 to 5 do S:=S+C[i];
Writeln('произведение элементов массива=',S);
end.