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

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