Составить программу на языке Паскаль для задачи: ввести два целых числа Х и Y и выяснить, что больше их сумма или произведение. в качестве результата печатать "сумма" или "произведение" или "равно"

Предыдущий
вопрос Следующий
вопрос

program CompareNumbers
va
X, Y, Sum, Product: integer
begi
writeln('Введите два целых числа:')
readln(X)
readln(Y)
Sum := X + Y
Product := X * Y
if Sum > Product the
writeln('Сумма'
else if Product > Sum the
writeln('Произведение'
els
writeln('Равно')
end.