Даны два числа если первое больше второго ТО вывести их произведение в противном случае вывести их сумму

Это, конечно, не С++ (куда уж нам!), зато куда короче и нагляднее )))

------------------------

PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var (a, b) := ReadReal2;

 Println(a > b ? a * b : a + b)

end.