Построить схему алгоритма вычислительного процесса. Помогите, пожалуйста, с информатикой

Question

Задана чистовая последовательность (10,11,-5,16,44,77000). В этой последовательности найти количество и сумму четных чисел и произведение нечетных чисел. При вводе числа 77000 закончить работу
Всем спасибо, решила)

user_210578870 · Accepted Answer

У вас скорее всего проблема с типом данных.
На Паскале и Delphi это выглядит так:
var
mas: array[1..100000] of longint;
index, sum, col, prois, n: longint;
begin
read(n);
for index := 1 to n do
read(mas[index]);
col:=0; sum:=0; prois:=1;
for index := 1 to 6 do
begin
if mas[index] mod 2=0 then
begin
inc(col);
sum:=sum+mas[index];
end
else prois:=prois*mas[index];
end;
write('четные - ', col, ' ', sum, 'нечетные - ', prois);
end.
Если надо что то объяснить, пишите.

aleksandr_neivanov · Answer

Напиши как решаешь, помогу где не сможешь.