program z;
var a, b, c:Integer;
begin
read(a, b, c);
writeln('сумма трех чисел: ', a+b+c);
writeln('произведение трех чисел: ', a*b*c);
read();
end.
Объяснение:
если на паскале, то вот
