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