Составте программу, которая задаёт вопрос:"В каком году был основан город Минск" (например, в 1067 г., в 993 г., либо в 1147 г.) ?

Program minsk;

var a: integer;

begin

writeln ('В каком году был основан город Минск?') ;

writeln ('В 1067 г.') ;

writeln ('В 993 г.') ;

writeln ('В 1147 г.') ;

read (a) ;

if a=1067 then

writeln ('Верно') ;

else

writeln ('Не верно Минск был основан 1067 г')

end.