Задание:
Написать на паскале программу. Определить что меньше а или б.
Решение:
Var a, b: real; begin readln (a, b); if (a > b) then writeln (a, ' > ', b); if (a=b) then writeln (a, '=', b); if (a < b) then writeln (a, ' < ', b); end. Так=)
Знаете другой ответ?