Question

Написать программу проверки знания истории архитектуры. Программа должна вывести вопроси три варианта ответа. Пользователь должен выбрать правильный ответ и ввести его номер.Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом).Архитектор Исаакиевского собора:1. Доменико Трезини2. Огюст Монферран3. Карл РоссиВведите номер правильного ответа и нажмите <Enter>= 2Правильно.Архитектор Исаакиевского собора - Огюст Монферранна языке Turbo Pascal

Answer 1

Вот скачай и все впринципе_))))

Answer 2

Uses crt;
Var a:integer;
Begin       
clrscr;       
writeln('Архитектор Исаакиевского собора: ');       
writeln('1. Доменико Трезини');       
writeln('2. Огюст Монферран');       
writeln('3. Карл Росси');       
writeln('Введите номер правильного ответа и нажмите <Enter>');       
readln(a);       
if a=2 then writeln('Правильно.
Архитектор Исаакиевского собора - Огюст Монферран')       
else writeln('Не правельно');       
readln;       
end.