W=FLOOR(T/B) 　A0[I]=C+W 　C=T-W*B N=N-E NEXT PRINT "PI=";　　　　　　// 計算結果表示 FOR I=1 TO H 　PRINT A0[I]; NEXT PRINT "END"