program lanlan; var fo:text; begin assign(fo,'tour.out'); rewrite(fo); write(fo,'379.6'); close(fo); end.