Даны цифра a и b. Если a>b вычеслить сложение в противном случае вычеслить умножение
язык любой?
Var a, b: real; begin readln(a, b); if a > b then writeln(a + b) else writeln(a * b) end.