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

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

Question

Информатика

Иоанна

24 ноября, 12:35

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

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

+3

Ответы (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 (паскаль)