Иллюстрированный самоучитель по Turbo Pascal для начинающих

Выбор. If.

82. Написать программу проверки знания даты основания Санкт-Петербурга. В случае неверного ответа пользователя программа должна выводить правильный ответ. Ниже представлен рекомендуемый вид экрана во время работы программы.

В каком году был основан Санкт-Петербург?
Введите число и нажмите Enter
 › 1705
Вы ошиблись, Санкт-Петербург был основан в 1703 году.

83. Написать программу проверки знания даты начала второй мировой войны. В случае неверного ответа пользователя программа должна выводить правильный ответ. Ниже представлен рекомендуемый вид экрана во время работы программы.

В каком году началась вторая мировая война?
Введите число и нажмите Enter
 › 1939
Правильно.

84. Написать программу проверки знания истории архитектуры. Программа должна вывести вопрос и три варианта ответа. Пользователь должен выбрать правильный ответ и ввести его номер. Ниже представлен рекомендуемый вид экрана во время работы программы.

Архитектор Исаакиевского собора:
1. Доменико Трезини
2. Огюст Монферран
3. Карл Росси
Введите номер правильного ответа и нажмите Enter
 › 2
Вы ошиблись.
Архитектор Исаакиевского собора – Огюст Монферран.

85. Написать программу проверки знания истории архитектуры. Программа должна вывести вопрос и три варианта ответа, а пользователь – выбрать правильный ответ и ввести его номер. Ниже представлен рекомендуемый вид экрана во время работы программы.

Невский проспект получил свое название:
1. По имени реки, на берегах которой расположен Санкт-Петербург
2. По имени близко расположенного монастыря Александро-Невской лавры
3. В память о знаменитом полководце Александре Невском
Введите номер правильного ответа и нажмите Enter
 › 2
Вы ошиблись.
Правильный ответ: 2.

86. Написать программу, которая сравнивает два числа, введенных с клавиатуры. Программа должна указать, какое число больше, или, если числа равны, вывести соответствующее сообщение. Ниже представлен рекомендуемый вид экрана во время работы программы.

Введите в одной строке два целых числа и нажмите Enter.
 › 34 67
34 меньше 67.
Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.