Question

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

Answer 1

Var a, b, c: integer;
begin 
readln (a, b, c);
writeln('Сумма: ' , a+b+c);
write('Произведение: ', a*b*c);
end.