【BIG】　100口以上購入の人　【統計】

　　　　　　　　　　　　　　　　　　　 // 【ファイル名】keta.js
a = new Array("", "", "", "", "");　　 // 出力する5行を生成した（5口ぶんだから5行ある。5行まで出力できる）
o = WScript.CreateObject("Scripting.FileSystemObject"); // 【実行】cscript keta.js
text = o.OpenTextFile("gyo.txt", 1);//【準備】オフィシャルサイトからコピーして貼り付けた14行を"gyo.txt"のファイル名で保存。
while(! text.AtEndOfStream) {　　　　　// ファイルの終わりではない
　　string = text.ReadLine();　　　　　// ファイルから1行を入力した
　　for(p = 0, i = 0; i < 58; i++) {　 // 入力した1行は、58文字以内である。出力行の番号pは、0, 1, 2, 3, 4
　　　　s = string.substr(i, 1);　　　 // sは、i番目の1文字
　　　　f = s.indexOf("１", 0)　　　　 // 全角の１を検索
　　　　if(f != -1) {　　　　　　　　　// 一致した
　　　　　　a[p] = a[p]　+ "1";　　　　// 出力行の内容として1を追加した
　　　　　　p++;　　　　　　　　　　　 // 次の出力行の番号
　　　　}
　　　　f = s.indexOf("０", 0)　　　　 // 全角の０を検索
　　　　if(f != -1) {　　　　　　　　　// 一致した
　　　　　　a[p] = a[p]　+ "0";　　　　// 出力行の内容として0を追加した
　　　　　　p++;　　　　　　　　　　　 // 次の出力行の番号
　　　　}
　　　　f = s.indexOf("２", 0)　　　　 // 全角の２を検索
　　　　if(f != -1) {　　　　　　　　　// 一致した
　　　　　　a[p] = a[p]　+ "2";　　　　// 出力行の内容として2を追加した
　　　　　　p++;　　　　　　　　　　　 // 次の出力行の番号
　　　　}
　　}
}
text.Close();
for(p = 0; p < 5; p++) {　　　　　　　 // 5行を出力する（出力行の番号pは、0, 1, 2, 3, 4）
　　WScript.Echo(a[p]);
}

>>207 「【準備】オフィシャルサイトからコピーして貼り付けた14行を"gyo.txt"のファイル名で保存」
11/28 鹿島 Ｇ大阪 １ ２ ０ １
11/28 名古屋 山形 ０ ０ ０ ２
11/28 京都 浦和 ０ ０ １ １
11/28 大宮 柏 １ １ ０ ０
11/28 Ｆ東京 神戸 １ ０ ０ １
11/28 川崎 新潟 ０ １ １ ０
11/28 磐田 広島 ０ ２ １ ０
11/29 横浜Ｍ 清水 ０ ２ １ １
11/29 千葉 大分 ２ １ １ １
11/29 徳島 仙台 ０ ２ １ ２
11/28 Ｃ大阪 岐阜 ０ １ ２ １
11/28 岡山 甲府 ０ ２ ２ １
11/29 福岡 水戸 ２ １ ０ ２
11/29 札幌 横浜Ｃ ２ ２ ２ ２

>>208
>>207 「【準備】オフィシャルサイトからコピーして貼り付けた14行を"gyo.txt"のファイル名で保存」
11/28　鹿島　Ｇ大阪　１　　　　　　 ２　　０　　１　　　　　　　　
11/28　名古屋　山形　　 ０　　　 ０　　　 ０　　　　　２　　　　　
11/28　京都　浦和　　 ０　　　 ０　　１　　　 １　　　　　　　　
11/28　大宮　柏　１　　　 １　　　　　０　　　 ０　　　　　　
11/28　Ｆ東京　神戸　１　　　　　０　　　 ０　　１　　　　　　　　
11/28　川崎　新潟　　 ０　　１　　　 １　　　　　０　　　　　　
11/28　磐田　広島　　 ０　　　　　２ １　　　　　０　　　　　　
11/29　横浜Ｍ　清水　　 ０　　　　　２ １　　　 １　　　　　　　　
11/29　千葉　大分　　　　２ １　　　 １　　　 １　　　　　　　　
11/29　徳島　仙台　　 ０　　　　　２ １　　　　　　 ２　　　　　
11/28　Ｃ大阪　岐阜　　 ０　　１　　　　　　 ２ １　　　　　　　　
11/28　岡山　甲府　　 ０　　　　　２　　　 ２ １　　　　　　　　
11/29　福岡　水戸　　　　２ １　　　　　０　　　　　２　　　　　
11/29　札幌　横浜Ｃ　　　　２　　　 ２　　　 ２　　　 ２　　　　　

>>207 【実行】cscript keta.js
Microsoft (R) Windows Script Host Version 5.6
Copyright (C) Microsoft Corporation 1996-2001. All rights reserved.

10011000200022
20010122121212
00100111112202
12101001121122


D:\work>

>>207の全角空白を半角空白に置換するべきとおもいますが、置換しなくてもうごいてます