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

program zz1;

var k:integer; / / задаем переменную целого типа

begin

write (' введите год начала второй мировой войны '); / / вводим число с клавиатуры

read (k);

if k = 1939 / / проверяем, если введенное число совпадает с годом начала второй мировой войны, то

then writeln (' ответ правильный ') / / выводим один ответ

else writeln (' ответ не правильный '); / / выводим другой ответ

end.