10INPUTA,B 20C=0 30X=B 40IFX=0GOTO200 50X=X-1 60B=X 70X=C+A 80C=X 85X=0 90GOTO30 200PRINTC 300END