ライス @raice5673.bsky.social · 09/02/2024BASICでN面ダイスをM個振るときのプログラムです TRPGなどでお使いください RANDOMIZE INPUT PROMPT "サイコロの目,個数":N,M INPUT PROMPT "合計を出す→1":C FOR I=1 TO M LET J=INT(RND*N)+1 PRINT M:"個目":J IF C=1 LET C=C+J PRINT "計":C END IF NEXT I 000
