>>192 >>34を参考にして繰り返し内の文を簡単にしようと 自分でやってみたんですが、このように表示されてしまいます→ 0 1 0 おかしい所の訂正をお願いします。 0 0 0 0 0 0 100 color 0,7:cls 110 dim a(99,99) 120 input "n";n 130 if n mod 2=0 then print "( ´,_ゝ`)プッ":end 140 x=n\2+1:y=1 150 for i=1 to n*n 160 a(y,x)=i 170 if i mod n=0 then y=y+1 else goto 180 180 if y=1 then y=n and x=x+1 else goto 190 190 if x=n then y=y-1 and x=1 else goto 200 200 if y<>1 and x<>n then y=y-1 and x=x+1 210 next i 220 for i=1 to n 230 for j=1 to n 240 print a(i,j); 250 next j 260 print 270 next i 280 end