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

Question

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

Comments

Паскаль?

---

Да

---

Помогите пожалуйста,очень нужно

Answer 1

Var A:integer;
Begin
WriteLn('Введите год начала Великой Отечественной войны:');
ReadLn(A);
if A = 1941 then WriteLn('Верно')
else WriteLn('Неверно')
End.

Comments

Огромное вам спасибо!