Задание №2. Задача: Ввести три числа, найти их сумму и произведение.

Program numbers;

Var a, b, c, sum, product: integer;

Begin

readln(a, b, c);

sum := a + b + c;

product := a * b * c;

writeln('Сумма: ', sum);

writeln('Произведение: ', product);

End.