十進BASIC
２乗を使うと風船ができました
SET WINDOW 1,639,1,399
FOR X=0 TO 639
FOR Y=0 TO 399
LET C=MOD( (X^2/3+Y^2/5)/100 , 7 )
SET LINE COLOR C
PLOT X,Y
NEXT Y
NEXT X
END


参照 （仮称）十進BASICのホームページ
「やさしいコンピュータ　CGワンダーランド」（日本放送協会）