Задан массив А [1..20]. Найти сумму случайных 5 чисел.

Question

Задан массив А [1..20]. Найти сумму случайных 5 чисел.

Answer 1

Ответ:

Объяснение:

Var

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

s:integer;

begin

s:=Random(100)+Random(100)+Random(100);

writeln(s);

Readln;

end.