Вывести на экран 10 случайных чисел. случайные числа должны браться из [-10, 20] (использовать random). Найти их сумму.

использовать цикл For (паскаль)

Question

Информатика

Дениса

9 января, 23:05

Вывести на экран 10 случайных чисел. случайные числа должны браться из [-10, 20] (использовать random). Найти их сумму.

использовать цикл For (паскаль)

+1

Ответы (1)

Знаете ответ?

Федяка · Answer 1

Program intel;

var a, i, sum: integer;

Begin

randomize;

sum:=0;

for i:=1 to 10 do

begin

a: = random (31) - 10;

writeln (a:10) ;

sum:=sum+a;

end;

writeln;

writeln (sum:10) ;

readln;

end.

Вывести на экран 10 случайных чисел. случайные числа должны браться из [-10, 20] (использовать random). Найти их сумму.использовать цикл For (паскаль)

Вывести на экран 10 случайных чисел. случайные числа должны браться из [-10, 20] (использовать random). Найти их сумму.

использовать цикл For (паскаль)