program speedrun implicit none integer::X,Y,Z integer::ANS=0 read*,X,Y,Z ANS=min(X,Y) X=X-ANS Y=Y-ANS ANS=ANS+min(max(X,Y),Z) Z=Z-min(max(X,Y),Z) ANS=ANS+max(0,Z/2) print"(i0)",ANS end program speedrun