Написать программу проверки знания архитектуры. программа должна вывести вопроси три варианта ответа. пользователь должен выбрать правильный ответ и ввести его номер.ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом). архитектор исаакиевского собора: 1. доменико трезини 2. огюст монферран 3. карл росси введите номер правильного ответа и нажмите = 2 правильно. архитектор исаакиевского собора - огюст монферран на языке turbo pascal

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.

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