1.
var a, y, b:integer;
begin
y:=0;
readln(a, b);
y:=(a+2*b)/(a*a+1)
write(y);
end.
2.
x1, x2, x3, sum, mult:integer;
sum:=0; mult:=0;
readln(x1, x2, x3);
sum := x1+x2+x3;
mult := x1*x2*x3;
write('Sum: ', sum, ' Mult: ', mult);
1.
var a, y, b:integer;
begin
y:=0;
readln(a, b);
y:=(a+2*b)/(a*a+1)
write(y);
end.
2.
x1, x2, x3, sum, mult:integer;
begin
sum:=0; mult:=0;
readln(x1, x2, x3);
sum := x1+x2+x3;
mult := x1*x2*x3;
write('Sum: ', sum, ' Mult: ', mult);
end.