Найти произведение элементов в массиве из 10 элементов заданных используя рандом от 1 до 100 Паскаль
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Можете сказать где ошибка? на с++ или с.на ввод два натуральных числа n и mn
Автор: Голубева1440
Чему равна основание 8-ричной системы счисления
Автор: Староческуль-Станиславовна
Как называется данный инструмент?
Автор: РобертИрина
Написать программу на любом языке программирования по этой схеме
Автор: aleksey7800
var
a: array[1..10] of integer;
i,s: integer;
begin
s:=1;
for i:= 1 to 10 do
begin
a[i]:=random(1,100);
s:=s*a[i];
end;
writeln(s);
end.