<em>// PascalABC.NET 3.3, сборка 1627 от 27.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (a,b):=ReadReal2('Введите два числа:');
if a>b then Writeln('Первое число больше')
else
if b>a then Writeln('Второе число больше')
else Writeln('Числа равны')
end.
<u>Пример</u>
Введите два числа: 25 24.95
Первое число больше
Мадана это медведь на юге
В восьмеричной сс максимальная возможная цифра - 7.
5423,4321,1000,6007 <span>МОЖНО ОТНЕСТИ К ВОСЬМЕРИЧНОЙ СС.</span>
11001101 11101000 11111000 11101110 11101101 11101110 11100010