いろんな言語で宿題スレ
at TECH
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このスレッドのURL
■項目テキスト
400:デフォルトの名無しさん 09/07/08 13:00:02 >>399 % Prolog t399 :- 二次元構造の読み込み('test.dat',_二次元構造), member(A,_二次元構造), concat_atom(L,' ',S), write_formatted('%t\n',[S]), fail; true. 二次元構造の読み込み(File,_二次元構造) :- open(File,Input), findall(L,(repeat,get_line(Input,X),(X=end_of_file,!,fail; split(X,[' '],L))),_二次元構造), close(Input),!. 401:デフォルトの名無しさん 09/07/08 13:04:19 >>399 訂正。 % Prolog t399 :- 二次元構造の読み込み('test.dat',_二次元構造), member(L,_二次元構造), concat_atom(L,' ',S), write_formatted('%t\n',[S]), fail; true. 二次元構造の読み込み(File,_二次元構造) :- open(File,Input), findall(L,(repeat,get_line(Input,X),(X=end_of_file,!,fail; split(X,[' '],L))),_二次元構造), close(Input),!.
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック!
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4630日前に更新/314 KB
担当:undef