По информатике,нужно на паскале! написать программу проверки знания основания петербурга.в случае неверного ответа пользователя,программа должна выводить правильный ответ.
Var data: integer; begin writeln('Введите год основания города Санкт-Петербурга'); readln(a); If a = 1703 then writeln('Верно!') else writeln('Санкт-Петербург был основан в 1703 году'); end.
begin
writeln('Введите год основания города Санкт-Петербурга');
readln(a);
If a = 1703 then
writeln('Верно!')
else
writeln('Санкт-Петербург был основан в 1703 году');
end.