<span><span>Диаграмма</span>! (9 букв)...</span>
Программа на Кумире прилагается.
Var a,b,c,d:integer;
begin
writeln('Введите числа');
readln(a,b,c);
if (a mod 2=0) then d:=a;
if (b mod 2=0) then d:=d+b;
if (c mod 2=0) then d:=d+c;
if d<>0 then writeln('Сумма чётных чисел равняется ',d)
else writeln('Нет чётных чисел');
<span>end.</span>
Как-то так
алг
нач
цел н
ввод н
вывод н * (н + 1) / 2
кон