var x,y,z: integer; begin writeln ('Vvedite chisla x,y,z '); readln (x,y,z); writeln ('Summa ravna ',x+y+z); if ((x+y+z) mod 2 =0) then writeln ('Summa ne chetna9, proizvedenie ravno ',x*y*z) else writeln ('Summa ne chetna9'); end.