Дан набор ненулевых чисел ,признак его завершения - вопрос №25151230 от пропрл 20.04.2021 09:54

Question

Информатика: Дан набор ненулевых чисел ,признак его завершения число 0 .вывести сумму всех положительных четных чисел из данного набора. если требуемые числа отсутсвуют вывести то вывести 0

пропрл · Answer

Var a,s:integer;begina:=-1;while (a 0) do beginread(a);if a 0 then s+=a;end;writeln(s);end....