написать программу нахождения нечетного из 2-х чисел

var  a, b: integer;begin  readln(a, b);  if a mod 2 = 1 then     writeln(a, ' нечетное ')  else writeln(b, ' нечетное');end.