|
ゴンとも |
|
あらかじめメモ帳に作ってあるのでちょっと変形して
以下のプログラム(十進basic)で 10 FOR a=1 TO 14 20 FOR b=1 TO 14 30 if b=a then goto 290 40 FOR c=1 TO 14 50 if ((c=a) or (c=b)) then goto 280 60 FOR d=1 TO 14 70 if ((d=a) or (d=b) or (d=c)) then goto 270 100 LET x=a+d 110 LET y=b+c 120 IF x=y AND a<b AND b<c AND c<d THEN PRINT a;b;c;d 270 next d 280 next c 290 next b 300 next a END |
|
豊川市
4月6日（木） 0:08:10
MAIL:fttnm528@ybb.ne.jp 27102 |