Gadred
7 год назад
Составить массив из 7 чисел, произведение чётных и сумму нечётных виде программы ну поняли короче
ОТВЕТЫ
Генрихович
Aug 13, 2019
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
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
250
Смежные вопросы:
