В двух строках текстого файла находится по одному целому числу. Найти какое из этих чисел больше. Результат на экран (Паскаль)
Var f1: text; a,b: integer; begin assign (f1, ''); read (f1, a,b); close; if a>b then writeln (a, '>', b) else writeln (a, '<', b);<br>end.
Close(f1); //sorry ochibs`a