anarchy golf - the source code

4 in 3 by pooq

do
read*,a,b
print'(f0.2)',a*b/(a+b)
enddo
end

Note that non-ascii characters in the above source code will be escaped (such as \x9f).