Ввести в паскаль программу в каком году началась 2 мировая война нужно ввести дату

Program p1;
var
x:integer; 
begin
writeln('В каком году началась Вторая мировая война?');
read(x);
if x=1939 then
writeln('Верно!')
else
writeln('Подучите историю!');
read
end.