takaさんのちょっとした依頼で、４年ぶりにＣでプログラムを組みました。
ブランクあっても、書けることは書けますね。案外。
まあ、ノーパから完全にコンパイラが消滅してたので組めてるかどうか怪しいですがｗ

ちなみに、ＨＳＰで極限から円周率を求めてみると簡単にできました。
 onexit *pend
 title "円周率"
 ang=0.01
 S = 0.0
 S2 = 0.0
 S3 = 0.0
 rad = ang * 3.141592 / 180.0

 repeat 9000
 si = sin(rad)
 S = si/2
 S2=S
 S3+=S2
 loop

 mes S3*4
 stop
 
*pend
 end

結果：3.1415192
もっとも、最初から円周率を指定する必要があるので、あまり秀逸とは言えませんね。

[0回]