10 PRINT "INPUT A,B. TO END PROGRAM INPUT 0,0."
20 INPUT A,B
25 IF A=0 THEN 70
30 PRINT "LOG";B;"TO BASE";A;"=";LOG(B)/LOG(A) 
40 PRINT 
50 PRINT "INPUT A,B" 
60 GOTO 20 
70 END 

