Создать массив 10 случайных целых чисел в диапазоне - вопрос №10551362188 от prostonick111237 19.02.2022 18:59

Question

Информатика: Создать массив 10 случайных целых чисел в диапазоне [-5; 5]. вычислить сумму элементов меньших 3.

prostonick111237 · Answer

var a: array [1..10]  of integer;i, sum: integer;beginsum:=0;randomize;for i:=1 to 10 doa[i]:= random(11) - 5;for i:=1 to 10 do beginif a[i] 3 then sum:=sum+a[i];end;writeln(sum);end.Объяснение:...