bloxa060 Var a, s, r:integer;
begin
a:=2*(8+6);
s:=2*(3+9);
r:=a+b;
write (r);
end.