初学者向けプログラミング学習環境 PEN 開発メモWiki

Memo/東京五輪2020エンブレム

流行っているみたいなので便乗。

東京オリンピック

実数 a, r
a ← 200

gOpenWindow(600, 600)

gSetLineColor(255, 215, 0)
gSetFillColor(255, 215, 0)
gFillBox(0, 0, a, a)

gSetLineColor(128, 128, 0)
gSetFillColor(128, 128, 0)
gFillBox(2*a, 2*a, 3*a, 3*a)

r ← sqrt(1.5*1.5+0.5*0.5)*a

gSetLineColor(255, 255, 255)
gSetFillColor(255, 255, 255)
gFillCircle(1.5*a, 1.5*a, r)

gSetLineColor(0, 0, 0)
gSetFillColor(0, 0, 0)
gFillBox(a, 0, a, 3*a)

gSetLineColor(255, 0, 0)
gSetFillColor(255, 0, 0)
gFillCircle(2.5*a, 0.5*a, 0.5*a)

東京オリンピック・パラリンピック

実数 a, r
a ← 200

gOpenWindow(600, 600)

gSetLineColor(0, 0, 0)
gSetFillColor(0, 0, 0)
gFillBox(0, 0, 600, 600)

gSetLineColor(255, 215, 0)
gSetFillColor(255, 215, 0)
gFillBox(0, 0, a, a)

gSetLineColor(128, 128, 0)
gSetFillColor(128, 128, 0)
gFillBox(2*a, 2*a, 3*a, 3*a)

r ← sqrt(1.5*1.5+0.5*0.5)*a

gSetLineColor(0, 0, 0)
gSetFillColor(0, 0, 0)
gFillCircle(1.5*a, 1.5*a, r)

gSetLineColor(255, 255, 255)
gSetFillColor(255, 255, 255)
gFillBox(a, 0, a, 3*a)

gSetLineColor(255, 0, 0)
gSetFillColor(255, 0, 0)
gFillCircle(2.5*a, 0.5*a, 0.5*a)

Menu

Wikiについて

最近の更新