program minsk;
var
a: integer;
begin
writeln('В каком году был основан город Минск?');
writeln('В 1067г.');
writeln('В 993г.');
writeln('В 1147г.');
read(a);
if a = 1067 then
writeln('Верно')
else
writeln('Не верно Минск был основан 1067г')
end.
program minsk;
var
a: integer;
begin
writeln('В каком году был основан город Минск?');
writeln('В 1067г.');
writeln('В 993г.');
writeln('В 1147г.');
read(a);
if a = 1067 then
writeln('Верно')
else
writeln('Не верно Минск был основан 1067г')
end.