Ввести с клавиатуры 2 целых числа: m, n. Если n ≤ m, то вывести 1, в противном случае — любое другое число. Напишите

program compare;var n, m, k : integer;begin write(\'m = \'); Readln(m); write(\'Enter n = \'); Readln(n); randomize; k:= random(9)+1; //случайное число от 2 до 10 if m<=n then writeln(1) else writeln(k) //если m<=n вывести 1,//иначе любое число от 2 до 10. end.