Составить массив из 7 чисел, произведение чётных и сумму нечётных виде программы ну поняли короче

gubkaBob216 gubkaBob216    3   08.08.2019 08:00    1

Ответы
pavlushkaaa pavlushkaaa  04.10.2020 04:36
Cls
dim a(7)
for i=1 to 7
  input a(i)
next i
z=1:s=0
for i=1 to 7
if a(i) mod 2=0 then
  z=z*a(i)
else
  s=s+a(i)
end if
print s,z
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика