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

кёрс23 кёрс23    3   13.05.2019 20:28    0

Ответы
faas1501 faas1501  10.06.2020 02:45

var a: array [1..10]  of integer;

i, sum: integer;

begin

sum:=0;

randomize;

for i:=1 to 10 do

a[i]:= random(11) - 5;

for i:=1 to 10 do begin

if a[i] < 3 then

sum:=sum+a[i];

end;

writeln(sum);

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика