Составить программу-игру угадывания чисел. Если число угадано, то «МОЛОДЕЦ», а потом запись «ИГРА ЗАКОНЧЕНА». Если число не угадано, то «НЕ УГАДАЛ», а потом запись «ИГРА ЗАКОНЧЕНА».

program z:var i:integer;const u:integer=23;beginread(i);if i=u then write('МОЛОДЕЦ') else write('НЕ УГАДАЛ');writeln('ИГРА ЗАКОНЧЕНА');end.