7. Написать программу проверки знания даты начала второй мировой войны. В случае неверного ответа пользователя программа должна выводить правильный ответ. Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом).
В каком году началась вторая мировая война?
Введите число и нажмите
-> 1939
Правильно.

7. Написать программу проверки знания даты начала второй мировой войны. В случае неверного ответа пользователя программа должна выводить правильный ответ. Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом).
В каком году началась вторая мировая война?
Введите число и нажмите
-> 1939
Правильно.

01-06-2019 09:27 Просмотры: 6
Ответы (1)
Терек Кечемайкин
+1
2019-06-01 11:19:44

var year, answer: Integer; begin WriteLn('V kakom gadu nochalasya voina?'); WriteLn('Vvedite god nachala WoW'); ReadLn(answer);  if answer <> year then     begin  WriteLn('Ne pravilno, pravilniy atvet bil = ' + year); end else          begin            WriteLn('VERNA!');          end;    end; end.