**TI92P*mainProgram file 06/12/05, 23:45Rcasseú¥Z ( mes) Prgm Local a,b,res ClrIO For a,1,25 If gcd(a,26)=1 Then For b,1,26 dechifaf(mes,a,b)res Disp {res,a,b} EndFor EndIf EndFor EndPrgmäåܯ.