10 PRINT "１日のうちで時計の３つの針が重なる時刻をすべて示します。"
20 PRINT
30 FOR t=0 TO 60*60*24-1
40    LET o=MOD(360*t/(60*60*12),360)
50    LET m=MOD(360*t/(60*60),360)
60    LET s=MOD(360*t/60,360)
70    IF o=m AND m=s THEN
80       LET a=INT(t/(60*60))
90       LET b=MOD(t,60*60)
100       LET c=INT(b/60)
110       LET d=MOD(b,60)
120       PRINT a;"時";c;"分";d;"秒"
130    END IF 
140 NEXT t
150 PRINT
160 PRINT "　もし、上に何も記載がなければ、該当するものはありません。"
170 PRINT "このプログラムは終了しました。"
180 END