2021-05-10から1日間の記事一覧
ja.wikipedia.org 十進basicを使っています ズッカーマン数をもとめています。 オプションタブより microsoft 互換モードで実行 LET s=1FOR a=1 TO 1000000 LET aa$=STR$(a) LET b=LEN(aa$) LET product=1 FOR r=1 TO b LET product=product*VAL(mid$(aa$,r,…
ja.wikipedia.org 十進basicを使っています ズッカーマン数をもとめています。 オプションタブより microsoft 互換モードで実行 LET s=1FOR a=1 TO 1000000 LET aa$=STR$(a) LET b=LEN(aa$) LET product=1 FOR r=1 TO b LET product=product*VAL(mid$(aa$,r,…
