1.
var
a, b, c, s, p: integer;
begin
readln(a, b, c);
s:=a+b+c;
p:=a*b*c;
writeln(a, '+', b, '+', c, '=', s);
writeln(a, '*', b, '*', c, '=', p);
end.
2.
var
a, b, c, s, p: integer;
sr: real;
begin
readln(a, b, c);
s:=a+b+c;
p:=a*b*c;
sr := s/3;
writeln(a, '+', b, '+', c, '=', s);
writeln(a, '*', b, '*', c, '=', p);
writeln('(', a, '+', b, '+', c, ')/3=', sr);
end.