Begin var a:=readinteger('Введите первое число:'); var b:=readinteger('Введите второе число:'); var c:=readinteger('Введите третье число:'); if ((a+b+c) mod 2 = 0) then write('Сумма a,b,c = ',a+b+c,' является чётной') else write('Сумма a,b,c = ',a+b+c,' является нечётной'); end.