module Main; import CPLib.IO::{read_i, read_is}; import MPFR::MPFR::{mpfr_i, sqrt, to_string_digits, to_string_precision}; main : IO () = ( let prec = 128; let mpfr = mpfr_i(prec); let n = *read_i; let xs = *read_is(n); range(0, n).fold_m(mpfr(0), |i, sum| let sum = sum + xs.@(i).mpfr.sqrt; sum.to_string_digits(16).println;; sum.pure );; pure() );