数字の組合せ

　　数字の組合せ 勇次 2005/04/14 18:23:55 
　　└LETN=13 白石和夫 2005/04/14 18:44:58

　　数字の組合せ 勇次 2005/04/14 18:23:55  ツリーへ

数字の組合せ 返事を書く

勇次 2005/04/14 18:23:55

与えられたＮ個の数字から、ある定数ａに一番近い組合わせを
見つけ出し表示し、次に２番目、３番目と表示していくプログラムを作ろうとしています。

具体的には・・・・
与えられる数値、3.6,0.7,2.7,1.2,3.5,1.9,2.4,1.1,0.9,1.1,2.8,1.7,0.7
という全13個で、定数が5.0の時、

3.6,0.7,0.7
2.8,1.1,1.1
2.4,1.7,0.9
2.7,1.9
3.5,1.2
と表示される様な感じです。
数字を並べ替えたり、判断文を使って考えてみてはいるのですが、うまくいきません。
どうかアドバイスをお願いします。

　　└LETN=13 白石和夫 2005/04/14 18:44:58  ツリーへ

Re: 数字の組合せ 返事を書く

白石和夫 2005/04/14 18:44:58

LET N=13
DIM x(N),d(N),ix(N)
DATA 3.6,0.7,2.7,1.2,3.5,1.9,2.4,1.1,0.9,1.1,2.8,1.7,0.7
MAT READ x
FOR i=1 TO N
LET d(i)=ABS(x(i)-a)
NEXT i
とやって，dとixをLibraryフォルダにあるsort2.libのsort副プログラムにかければ，ix(1)がd(k)が最小となるkになります。

インデックスへ EXIT
新規発言を反映させるにはブラウザの更新ボタンを押してください。

数字の組合せ	返事を書く
勇次 2005/04/14 18:23:55
与えられたＮ個の数字から、ある定数ａに一番近い組合わせを見つけ出し表示し、次に２番目、３番目と表示していくプログラムを作ろうとしています。具体的には・・・・与えられる数値、3.6,0.7,2.7,1.2,3.5,1.9,2.4,1.1,0.9,1.1,2.8,1.7,0.7 という全13個で、定数が5.0の時、 3.6,0.7,0.7 2.8,1.1,1.1 2.4,1.7,0.9 2.7,1.9 3.5,1.2 と表示される様な感じです。数字を並べ替えたり、判断文を使って考えてみてはいるのですが、うまくいきません。どうかアドバイスをお願いします。

Re: 数字の組合せ	返事を書く
白石和夫 2005/04/14 18:44:58
LET N=13 DIM x(N),d(N),ix(N) DATA 3.6,0.7,2.7,1.2,3.5,1.9,2.4,1.1,0.9,1.1,2.8,1.7,0.7 MAT READ x FOR i=1 TO N LET d(i)=ABS(x(i)-a) NEXT i とやって，dとixをLibraryフォルダにあるsort2.libのsort副プログラムにかければ，ix(1)がd(k)が最小となるkになります。