Program post site for everyone
Recommendation IchigoLatte IchigoJam PanCake MyApp
2023/01/28 22:15:47
MixJuice GET URL : kidspod.club/mj/2178
ato5fun
■説明SIN(サイン)とCOS(コサイン)が使えるようになってたので、試しに使ってみました。実行すると角数を聞かれるので入力します。角数を多くするとだんだん円になっていくのがわかるかと思います。角数で何も入力しないと3角形から10角形を繰り返し描きます。
10 CLV:X=55:Y=24 20 INPUT "カクスウ?",A:IF A<3 THEN A=3:B=1 30 @A:CLS:?A:FOR I=0 TO 360 STEP 360/A 40 T=COS(I)*24/260:U=SIN(I)*24/260 50 DRAW X,Y,T+32,U+24 60 X=T+32:Y=U+24 70 NEXT 80 IF B=1 THEN A=A+1:A=A-(A=11)*8:WAIT10:GOTO@A