Grapes/win 2.8 [Don't Edit] 3.14 ---------- BGstretchOn BGfile 0 ---------- UserFunction 0 ---------- y = f(x) 0 ---------- 0 = f(x,y) 0 ---------- Point 22 2 3 6 0 0 7 0 5 0 1 0 0 0 0 0 0 0 0 0 0 0 4 1 1 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 P 1 0 2 P (roll(2Pi(k+a)/n)).x (roll(2Pi(k+a)/n)).y 0 t 0.1 0 0 16777215 16711680 16777215 1 0 0 1 1 0 0 4 0 1 0 Q 1 0 2 Q (roll(2Pi(k)/n)).x (roll(2Pi(k)/n)).y 0 t 0.1 0 0 16777215 16711680 16777215 1 0 0 1 1 0 0 4 0 1 0 R 4 0 1 R m 0 t 0.1 0 0 16777215 16711680 16777215 1 0 0 3 1 0 0 4 0 3 0 S 0 0 1 T 0 0 1 U 3 0 1 U u 0 t 0.1 0 0 16777215 16711680 16777215 1 0 0 3 1 0 0 4 0 3 0 V 0 0 1 A 7 0 2 A (roll(2Pik/n)).x (roll(2Pik/n)).y 0 0 n k 1 0 0 0 8421504 16777215 1 0 0 1 1 0 0 2 0 1 0 B 0 0 1 C 2 0 2 C 0 0 1 t 0.1 0 0 16777215 8421504 16777215 0 0 0 2 1 0 0 2 0 1 0 D 0 0 1 E 0 0 1 F 0 0 1 G 0 0 1 H 0 0 1 I 0 0 1 J 0 0 1 K 0 0 1 L 0 0 1 M 0 0 1 N 0 0 1 O 1 0 2 O 0 0 0 t 0.1 0 0 16777215 16711680 16777215 1 0 0 1 1 0 0 3 0 1 0 ---------- Segments 1 1 1 1 7405312 16777215 1 1 1 0 0 0 2 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ---------- paramater 14 45 0 1 1 1 0 1 15 0 1 1 1 1 0 100 0 1 1 1 1 0 1 0 1 1 1 1 0 15 0 1 1 1 1 4 64 0 1 1 1 1 2 1 0 1 1 1 1 0 1 0 1 1 1 1 0 1 0 1 1 1 1 0 1 0 1 1 1 1 0 3 0 1 1 1 1 5 1 0 1 1 1 1 0 1 0 1 1 1 1 0 64 0 1 1 1 0 3 1 1 0 ---------- KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle 1 2 2 2 1 0 1 1 0 1 0 32 0 DrawMode SegmentShowSync 1 1 AfterImageColorNo, CanAImg,MaxAimgN0 0 1 3001 circleMode 1 ---------- ScaleX Vlow,VHigh,label 0 959 x x AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible 0 0 1 0 1 NUmber,Base,Linterval,numberR 1 1 1 1.12418300653595 High,Low 1.20643383549542 -1.19106616450458 ---------- ScaleY Vlow,VHigh,label 0 914 y AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible 0 0 1 1 0 NUmber,Base,Linterval,NumbeerR 1 1 1 1.01026694045175 High,Low 1.1818664423374 -1.1031335576626 ---------- ScaleS SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenterShowPOsition ShowEquation AxisType PolorNum Areafixed 0 1 0 1 12 0 0 0 0 0 12 0 0 0 ---------- Yvalue 1 1 ---------- Iinterval Svalue Evalue sliceNo 0 1 40 10 Dfuncno Efuncno AreaQ 1 0 0 ---------- Yvalue Function List 6 y1 y2 y3 y4 y5 y6 ---------- Panel Position 0 0 0 0 0 52 142 85 0 0 0 0 1 0 1 0 1 ---------- PetaMEMO SECTION Style, Color, BGcolor , Size, PositionX, positionY 3 0 2 14 0 0 0 86 {n}と{m}({<=100})に値を入力 {n=}!{n}角形の頂点に 素数刻みで離れた 頂点に色糸を張る 【素数列】 {m=}!{m}番目の素数=!{Cells(m,1)} まで使用する 【初項=公差=u,の列】 {m=}!{m}番目の項=!{Cells(m,1)} まで使用する #//【素数列を書く】 #for c:=1 to 100 #Cells(c,1):=Cells(c,2) #next #Refresh #//【公差uの数列を書く】 #for c:=1 to 100 #Cells(c,1):=u*c #next #Refresh #//《↑テーブルの作成↑》 #hidescript//SetColor #SetColor(L1,hsl(2a/n,1,0.5)) #hidescript//SetMono #SetColor(L1,rgb(0,0,0)) #Hidescript//模様を描く #calc #for k:=1 to n #Calc #next #draw #Hidescript//模様を順次描く #calc #for k:=1 to n #Draw #next #draw #//初期化 #a:=1 #k:=1 #draw #ClrAImg #Refresh #//急速描画 #Call(初期化) #for b:=1 to m # a:=Cells(b,1) # Call(SetColor) # Call(模様を描く) #Next #//順次描画 #Call(初期化) #for b:=1 to m # a:=Cells(b,1) # Call(SetColor) # Call(模様を順次描く) #Next #//急速描画(Mono) #Call(初期化) #for b:=1 to m # a:=Cells(b,1) # Call(SetMono) # Call(模様を描く) #Next #//順次描画(Mono) #Call(初期化) #for b:=1 to m # a:=Cells(b,1) # Call(SetMono) # Call(模様を順次描く) #Next ---------- 11 4 27 1 4 151 1 4 247 1 7 62 1 7 62 1 7 62 1 7 62 1 7 62 1 7 49 0 7 49 0 4 24 0 ---------- Table SECTION RowNo, ColumnNo 100 10 200 Table Data 1 data 3 2 2 data 6 3 3 data 9 5 4 data 12 7 5 data 15 11 6 data 18 13 7 data 21 17 8 data 24 19 9 data 27 23 10 data 30 29 11 data 33 31 12 data 36 37 13 data 39 41 14 data 42 43 15 data 45 47 16 data 48 53 17 data 51 59 18 data 54 61 19 data 57 67 20 data 60 71 21 data 63 73 22 data 66 79 23 data 69 83 24 data 72 97 25 data 75 101 26 data 78 103 27 data 81 107 28 data 84 109 29 data 87 113 30 data 90 127 31 data 93 131 32 data 96 137 33 data 99 137 34 data 102 139 35 data 105 149 36 data 108 157 37 data 111 163 38 data 114 167 39 data 117 167 40 data 120 173 41 data 123 179 42 data 126 181 43 data 129 191 44 data 132 193 45 data 135 197 46 data 138 199 47 data 141 211 48 data 144 223 49 data 147 227 50 data 150 229 51 data 153 233 52 data 156 239 53 data 159 241 54 data 162 251 55 data 165 257 56 data 168 263 57 data 171 269 58 data 174 271 59 data 177 277 60 data 180 281 61 data 183 283 62 data 186 293 63 data 189 307 64 data 192 311 65 data 195 313 66 data 198 317 67 data 201 331 68 data 204 337 69 data 207 347 70 data 210 349 71 data 213 353 72 data 216 359 73 data 219 367 74 data 222 373 75 data 225 379 76 data 228 383 77 data 231 389 78 data 234 397 79 data 237 401 80 data 240 409 81 data 243 419 82 data 246 421 83 data 249 431 84 data 252 433 85 data 255 439 86 data 258 443 87 data 261 449 88 data 264 457 89 data 267 461 90 data 270 463 91 data 273 467 92 data 276 479 93 data 279 487 94 data 282 491 95 data 285 499 96 data 288 503 97 data 291 509 98 data 294 521 99 data 297 523 100 data 300 541 60 60 60 60 60 60 60 60 60 60 ---------- SimpleMemo SECTION 0 ----------