../../Task/Totient-function/FreeBASIC