M-восраст человека , k- ( от 1 до 99)- любой число ,ввелся число m и k " мой восраст надо быть болшим (меньшим)" надо сделать программу
т.е. Ввожу m, генерирую k число от 1 до 99 и сравниваю?
да
Var m, k: integer; begin write('Введите m: '); read(m); k:= random(99)+1; if m>k then writeln('Ваш возраст больше.') else writeln('Ваш возраст меньше.') end.