Регистрация
alevtina1991268
25.01.2020 23:05
Информатика
Есть ответ 👍

1. задайте массив из 10 элементов с датчика целых случайных чисел. найдите сумму четных элементов массива. выведите на экран исходный массив и полученную сумму.

103
495
Посмотреть ответы 2

Ответы на вопрос:

nadyukov
nadyukov
4,6(5 оценок)
Var     s, i: integer;     a: array[1..10]of integer; begin for i: =1 to 10 do   begin   a[i]: =random(10);   write(a[i],' ');   if a[i] mod 2=0 then s: =s+a[i];   end; writeln; writeln('сумма четных: ',s) end.
aannaa2
aannaa2
4,8(82 оценок)
1- 2-

Популярно: Информатика