Составить программу, которая запрашивает год начала Великой Отечественной войны и анализирует введенное число (верно или неверно)

Question

Информатика

Северина

22 июля, 18:10

Составить программу, которая запрашивает год начала Великой Отечественной войны и анализирует введенное число (верно или неверно)

+1

Ответы (1)

Знаете ответ?

Рустя · Answer 1

Var A:integer;

Begin

WriteLn ('Введите год начала Великой Отечественной войны:') ;

ReadLn (A) ;

if A = 1941 then WriteLn ('Верно')

else WriteLn ('Неверно')

End.