Math Is Fun Forum

C.CQRPK

piMax in decimal started out as: 14159265358979323847, This is: 20 digits.
piMin in decimal started out as: 14159265358979323846, This is: 20 digits.
(C,C)
(Q,Q)
(R,R)
(P,P)
(K,K)
(N,N)
(K,K)
(X,X)
(Q,Q)
(S,S)
(Q,Q)
(N,N)
(C,C)
(M,M)    fourteen digits!   Tuesday, August 30, 2005  
(F,W) This is where min and max diverge.
(V,P)
(F,H)
(M,T)
(B,E)
(L,C)
(U,T)
(Q,J)
(I,Y)
(F,F)
(R,V)
________________________________________
see code below by John E. Franklin...
'program name: base26pi_BBK.bas  (using Just BASIC v1.0 from internet)
piMax= 14159265358979323847''6'264338327950288419716939937511
piMin= 14159265358979323846   '264338327950288419716939937510
piMaxString$= STR$(piMax)
piMinString$= STR$(piMin)
piMaxLen= LEN(piMaxString$)
piMinLen= LEN(piMinString$)

print "piMax in decimal started out as: ";piMax;", This is: ";piMaxLen;" digits."
print "piMin in decimal started out as: ";piMin;", This is: ";piMinLen;" digits."

nextMax= piMax
nextMin= piMin

'commence loop
For loopAround= 1 to 25
nextMax= nextMax * 26
nextMin= nextMin * 26
nextMaxString$= STR$(nextMax)
nextMinString$= STR$(nextMin)
rightMaxString$= RIGHT$(nextMaxString$,piMaxLen)
rightMinString$= RIGHT$(nextMinString$,piMinLen)
leftMaxString$= LEFT$(nextMaxString$,LEN(nextMaxString$) - piMaxLen)
leftMinString$= LEFT$(nextMinString$,LEN(nextMinString$) - piMinLen)
'print "@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@"
'print leftMaxString$;"%";rightMaxString$
'print leftMinString$;"%";rightMinString$
leftMax= val(leftMaxString$)
leftMin= val(leftMinString$)
'print "Next Max Digit is: ";CHR$(leftMax + 64);" ";leftMax
'print "Next Min Digit is: ";CHR$(leftMin + 64);" ";leftMin
nextMaxChar$=CHR$(leftMax + 64)
nextMinChar$=CHR$(leftMin + 64)
print "(";nextMinChar$;",";nextMaxChar$;")"

nextMax= val(rightMaxString$)
nextMin= val(rightMinString$)

next loopAround
_______________________________________________________
piMax in decimal started out as: 14160, This is: 5 digits.
piMin in decimal started out as: 14159, This is: 5 digits.
(C,C)
(Q,Q)
(R,R)
(O,S)  Diverges after 3rd digit.
(F,T)
(Z,U)
(R,V)
_______________________________________________
piMax in decimal started out as: 14159265358979323846264338327950288419716939937511, This is: 50 digits.
piMin in decimal started out as: 14159265358979323846264338327950288419716939937510, This is: 50 digits.
(C,C)
(Q,Q)
(R,R)
(P,P)
(K,K)
(N,N)
(K,K)
(X,X)
(Q,Q)
(S,S)
(Q,Q)
(N,N)
(C,C)
(M,M)
(K,K)
(G,G)
(M,M)
(P,P)
(S,S)
(F,F)
(J,J)
(T,T)
(C,C)
(P,P)
(F,F)
(S,S)
(T,T)
(H,H)
(Q,Q)
(W,W)
(M,M)
(D,D)
(P,P)
(A,A)
(B,B)
(E,M)  Diverges after 35 good digits
(Z,R)
(E,D)
(H,Z)
(D,W)
(N,R)
(B,W)
(R,Z)
(D,H)
(I,N)
(A,U)
(F,Y)
(O,S)
(L,C)
(Y,X)

__________________________________

piMax in decimal started out as: 1415926535897932384626433832795028841971693993751058209749445923078164062862089986280348253421170679821480865132823066470938446095505822317253594081284811174502841027019385211055596446229489549303820, This is: 199 digits.
piMin in decimal started out as: 1415926535897932384626433832795028841971693993751058209749445923078164062862089986280348253421170679821480865132823066470938446095505822317253594081284811174502841027019385211055596446229489549303819, This is: 199 digits.
(min,max)
(C,C)
(Q,Q)
(R,R)
(P,P)
(K,K)
(N,N)
(K,K)
(X,X)
(Q,Q)
(S,S)
(Q,Q)
(N,N)
(C,C)
(M,M)
(K,K)
(G,G)
(M,M)
(P,P)
(S,S)
(F,F)
(J,J)
(T,T)
(C,C)
(P,P)
(F,F)
(S,S)
(T,T)
(H,H)
(Q,Q)
(W,W)
(M,M)
(D,D)
(P,P)
(A,A)
(B,B)
(J,J)
(A,A)
(R,R)
(Y,Y)
(H,H)
(U,U)
(P,P)
(P,P)
(U,U)
(F,F)
(C,C)
(L,L)
(D,D)
(K,K)
(L,L)
(T,T)
(D,D)
(W,W)
(Q,Q)
(N,N)
(H,H)
(P,P)
(H,H)
(X,X)
(Z,Z)
(K,K)
(U,U)
(T,T)
(Y,Y)
(U,U)
(D,D)
(A,A)
(L,L)
(H,H)
(I,I)
(O,O)
(P,P)
(P,P)
(W,W)
(K,K)
(J,J)
(O,O)
(K,K)
(Q,Q)
(M,M)
(B,B)
(E,E)
(V,V)
(I,I)
(O,O)
(A,A)
(X,X)
(L,L)
(F,F)
(F,F)
(N,N)
(G,G)
(I,I)
(L,L)
(L,L)
(P,P)
(H,H)
(R,R)
(L,L)
(R,R)
(R,R)
(B,B)
(H,H)
(D,D)
(J,J)
(G,G)
(U,U)
(C,C)
(T,T)
(S,S)
(B,B)
(W,W)
(S,S)
(I,I)
(O,O)
(R,R)
(A,A)
(V,V)
(G,G)
(T,T)
(E,E)
(N,N)
(L,L)
(P,P)
(I,I)
(Z,Z)
(N,N)
(R,R)
(X,X)
(F,F)
(O,O)
(N,N)
(V,V)
(T,T)
(O,O)
(X,X)
(L,L)
(K,K)
(H,H)
(E,E)  This is the 140th decimal place.
(P,S)  min and max diverge here; digits are good above this point.
(B,I)
(X,H)
(X,Q)
(F,Y)
(X,L)
(J,S)
(Z,J)
(J,E)
(M,Z)
(E,D)
(P,J)
(W,Z)
(U,W)
(T,W)
(G,A)
(L,T)
(P,M)
(L,I)
(L,S)
(D,Y)
(Y,V)
(S,M)
(P,J)
(R,A)
(R,H)
(Q,U)
(D,Q)
(D,Y)
(Q,P)
(O,G)
(G,R)
(G,Q)
(G,Q)
(C,D)
(S,Z)
(P,S)
(E,N)
(U,X)
(H,W)
(N,Z)
(V,A)
(C,F)
(X,A)
(N,I)
(R,M)
(Q,V)
(Y,X)
(A,A)
(T,T)
(X,F)
(G,P)
(K,O)
(Y,C)
(E,V)
(Q,U)
(U,E)
(N,F)
(T,C)

__________________________________