このディレクトリの索引

# C/C++の宿題片付けます 137代目 #916 # [1] 授業単元:プログラミング # [2] 問題文(含コード&リンク):県から国、及び国から県に換算する関数を作成し、 # main関数でキーボードから数値とその値が国であるか県であるかを入力し、県ならば国に、 # 国ならば県に換算した値を小数点以下1桁までで出力するプログラムを作成しなさい。 # 値を引数とする関数で計算させ(関数名は nation とする)、出力は main関数で行うこと。 # # 関係は以下の通り # 県(A):(B+2)*5 国(B):A/3+25 # <例> # 数値を入力してください: 75 # 75 が「県」なら "A" を「国」なら "B" を入力してください: B # # 県 75.0 = 国 50.0 # # なお、if文かfor文を用いること。 # # 'キーボードから数値とその値が国であるか県であるかを入力し、県ならば国に、国ならば県に換算した値を小数点以下1桁までで出力する' :- 'キーボードから数値とその値が国であるか県であるかを入力し、'(_数値,_県または国), '県ならば国に、国ならば県に換算した値を小数点以下1桁までで出力する'(_数値,_県または国). 'キーボードから数値とその値が国であるか県であるかを入力し、'(_数値,_県または国) :- キーボードから数値を入力し(_数値), その値が国であるか県であるかを入力し(_数値,_県または国). キーボードから数値を入力し(_数値) :- write('数値を入力してください: '), 整数入力(_数値). その値が国であるか県であるかを入力し(_数値,_県または国) :- writef('%w が「県」なら "A" を「国」なら "B" を入力してください: ',[_数値]), 行入力(_値), 入力された値がAならば県にBならば国に変換する(_値,_県または国). 入力された値がAならば県にBならば国に変換する('A',県). 入力された値がAならば県にBならば国に変換する('B',国). '県ならば国に、国ならば県に換算した値を小数点以下1桁までで出力する'(_数値,_県または国) :- '県ならば国に、国ならば県に換算した値を'(_数値,_県または国,_換算した値,_県または国_2), '小数点以下1桁までで出力する'(_数値,_県または国,_換算した値,_県または国_2). '県ならば国に、国ならば県に換算した値を'(_数値,_県または国,_換算した値,_県または国_2) :- '県ならば国に換算した値を'(_数値,_県または国,_換算した値,_県または国_2). '県ならば国に、国ならば県に換算した値を'(_数値,_県または国,_換算した値,_県または国_2) :- '国ならば県に換算した値を'(_数値,_県または国,_換算した値,_県または国_2). '県ならば国に換算した値を'(_値,国,_換算した値,県) :- A is _値 * 1.0, _換算した値 is A / 3 + 25. '国ならば県に換算した値を'(_値,県,_換算した値,国) :- B is _値 * 1.0, _換算した値 is (B + 2) * 5. '小数点以下1桁までで出力する'(_値,_県または国,_換算した値,_県または国_2) :- format('~w ~1f = ~w ~1f\n',[_県または国,_値,_県または国_2,_換算した値]). 整数入力(_数値) :- 行入力(_行), atom_number(_行,_数値). 行入力(_行) :- read_line_to_codes(current_input,_入力されたコードならび), atom_codes(_行,_入力されたコードならび).