Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Заполнить массив случайными числами в количестве 20 штук. Найти сумму и произведение элементов массива.

10-11 класс

Nyamii 22 марта 2017 г., 15:31:11 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
BuNtArOcHkA
22 марта 2017 г., 16:03:11 (7 лет назад)

var

a:array[1..20] of integer;

sum,mul,i:integer;

begin

randomize;

for i:=1 to 20 do

begin

a[i]:=random(100);

end;

sum:=0;

mul:=1;

for i:=1 to 20 do

begin

sum:=sum+a[1];

mul:=mul*a[1];

end;

writeln('Summa=',sum);

writeln('Multiply=',mul);

end.

Ответить

Другие вопросы из категории

Читайте также

СРОЧНО, ПОЖАЛУЙСТА, НАПИШИТЕ КТО-НИБУДЬ, НА ЗАВТРА НАДО, УМОЛЯЮ, Я УЖЕ 30 РАЗ ЭТО ЗАДАНИЕ ПОСЫЛАЮ, НАПИШИТЕ!!!

1.Дано массив 5*5, заполнить массив случайными числами не больше 30 и найти сумму парных элементов массива, которые находятся под главной диагонали и количество не парных элементов которые находятся над главной диагонали.

ПАСКАЛЬ.1)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 1000.опишите на русском языке или на одном из

языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.



Вы находитесь на странице вопроса "Заполнить массив случайными числами в количестве 20 штук. Найти сумму и произведение элементов массива.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.