program CheckOddNumber;
varnum: integer;
beginwriteln('Enter a number: ');readln(num);
if num mod 2 <> 0 thenwriteln(num, ' is an odd number.')elsewriteln(num, ' is not an odd number.');
end.
program CheckOddNumber;
var
num: integer;
begin
writeln('Enter a number: ');
readln(num);
if num mod 2 <> 0 then
writeln(num, ' is an odd number.')
else
writeln(num, ' is not an odd number.');
end.