Var a, b, c: integer;
begin
readln (a, b, c);
writeln('Сумма: ' , a+b+c);
write('Произведение: ', a*b*c);
end.
<span><span /><span><span>
x
x1
</span><span>
2.00
2.69
</span><span>
2.20
3.99
</span><span>
2.40
5.37
</span><span>
2.60
6.74
</span><span>
2.80
7.95
</span><span>
3.00
8.92
</span><span>
3.20
9.59
</span><span>
3.40
9.94
</span><span>
3.60
10.02
</span><span>
3.80
9.90
</span><span>
4.00
9.71
</span></span></span>
Стакан с водой - a
Стакан с молоком - b
Дополнительный стакан - c
c=a;
a=b;
b=c;