このディレクトリの索引

# 出典 :: C/C++の宿題片付けます 152代目 #666 # [1] 授業単元:C言語プログラミング # [2] 問題文(含コード&リンク): 月の英語名を初期値とした文字列配列(大きさは12x10)を使って # キーボードから月の英語名を入力しそれが何月かを表示するプログラムを作成せよ. # 実行例↓ # $./kadai # Month? October # October is 10 gatsu # # $./kadai # Month? May # May is 5 gatsu # 月の英語名を初期値とした文字列ならび(['January','Febrary','March','April','May','June','July','Augest','September','October','November','December']). 月の英語名を初期値とした文字列ならびを使ってキーボードから月の英語名を入力しそれが何月かを表示する :- キーボードから月の英語名を入力し(_月の英語名), 月の英語名を初期値とした文字列ならび使ってそれが何月かを表示する(_月の英語名). 月の英語名を初期値とした文字列ならび使ってそれが何月かを表示する(_月の英語名) :- 月の英語名を初期値とした文字列ならび(_月の英語名を初期値とした文字列ならび), それが何月かを表示する(_月の英語名,_月の英語名を初期値とした文字列ならび). それが何月かを表示する(_月の英語名,_月の英語名を初期値とした文字列ならび) :- 月の英語名を初期値とした文字列ならびの中に月の英語名があればその位置番号にも当たる月を表示する(_月の英語名,_月の英語名を初期値とした文字列ならび). それが何月かを表示する(_月の英語名,_月の英語名を初期値とした文字列ならび) :- 月の英語名を初期値とした文字列ならびの中に月の英語名が見つからなければ疑問を表示する(_月の英語名,_月の英語名を初期値とした文字列ならび). キーボードから月の英語名を入力し(_月の英語名) :- write('月の英語名を入力してください : '), 行入力(キーボード,_月の英語名). 何月かを表示する(_月) :- writef('%t月です\n',[_月]). 行入力(_キーボード,_行) :- read_line_to_codes(user_input,Codes), atom_chars(_行,Codes). 月の英語名を初期値とした文字列ならびの中に月の英語名があればその位置番号にも当たる月を表示する(_月の英語名,_月の英語名を初期値とした文字列ならび) :- nth1(_月,_月の英語名を初期値とした文字列ならび,_月の英語名), 何月かを表示する(_月). 月の英語名を初期値とした文字列ならびの中に月の英語名が見つからなければ疑問を表示する(_月の英語名,_月の英語名を初期値とした文字列ならび) :- \+(nth1(_,_月の英語名を初期値とした文字列ならび,_月の英語名)), writef('%tは月の英語名ではないのではないですか? \n',[_月の英語名]). % % Prologに配列はないため、ここでは月の英語名のリスト、例によってリストを % ならびと表現した。Prologはリスト処理の言語であり、配列に当たる構造も % 全て先頭から処理するため、これでよいと思う。 %