Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

M-восраст человека , k- ( от 1 до 99)- любой число ,ввелся число m и k " мой восраст надо быть болшим (меньшим)"
надо сделать программу

Ответ оставил Гость

Var m, k: integer;
begin
write(Введите m: );
read(m);
k:= random(99)+1;
if m>k then
writeln(Ваш возраст больше.)
else
writeln(Ваш возраст меньше.)
end.