Дано случайное натуральное трехзначное число х. определить: является ли оно четным, оканчивается ли оно цифрой 5? ( тоже паскаль)

Program hhh54;
var x: longint;
begin
  randomize;
  x:=random (900)+100;
  if x mod 2 = 0 then writeln ('ЧЁТНОЕ')
  else writeln ('НЕЧЁТНОЕ');
  if x mod 10 = 5 then writeln ('ОКАНЧИВАЕТСЯ')
  else writeln ('НЕ ОКАНЧИВАЕТСЯ');
end.