« 数値集計 | トップページ | 平方根 »

2022年10月26日 (水)

1~1000まで

外部変形と関係ありませんが・・・・・
1~1000までの数を全て足すと、
(1+1000)X1000÷2=500500です。

計算するスプリクトを作成すると、
fso=new ActiveXObject("Scripting.FileSystemObject")
w=fso.CreateTextFile("calc.txt")
sum=0
for (i=1;i<=1000;i++){
num=i
sum=sum+num}
w.WriteLine(sum)

テキストエディタにコピペして、拡張子 .jsで保存し、
ダブルクリックで実行すると、
計算結果を、ファイル "calc" に書出しします。

|

« 数値集計 | トップページ | 平方根 »

コメント

コメントを書く



(ウェブ上には掲載しません)




« 数値集計 | トップページ | 平方根 »