Помогите пожалуйста. Нужно ввести 2 числа, вычислить сумму чисел и их произведение.вывести на экран большее значение
Var a, b, c, d:integer;beginReadln (a, b);C:=a+b;d:=a*b;writeln (сложение ,с,произведение,d);if c>b then writeln (Большесумма) else (больше произведение);End.
Оцени ответ