Помогите по информатике,необходимо на паскале!Написать программку проверки познания основания

Помогите по информатике,нужно на паскале!
Написать программку проверки познания основания Петербурга.В случае неправильного ответа юзера,программа обязана выводить верный ответ.

Задать свой вопрос
Чаус Эльвира
Год основания?
1 ответ
Var data: integer;
begin
writeln('Введите год основания городка Санкт-Петербурга');
readln(a);
If a = 1703 then 
writeln('Правильно!')
else 
writeln('Санкт-Петербург был основан в 1703 году');
end.


, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт