Помогите Пожалуйста, очень надо!! Программирование. Поезд в Варшаву отправляется по вторникам и пятницам. Пусть Х - день недели. Определить, можно ли уехать в Варшаву в этот день.х=2 или х=5

Var x:integer;
begin
  writeln(Введите день недели);
  readln(x);
  if (x=2)or(x=5) then writeln(можно уехать) else writeln (нельзя уехать)
end.