このディレクトリの索引

# 出典 :: C/C++の宿題片付けます 132代目 #560 # [1] 授業単元:C言語 # [2] 問題文(含コード&リンク): # int型整数の4乗を返す関数 # int pow4(int x) # を作成せよ。(ただし関数powは使用しない) # # (実行例) # 整数を入力してください:5 # その4乗値は625です。 # pow4 :- 整数を得る('整数を入力してください:',true,_整数), pow4(_整数,_4乗値), writef('その4乗値は%wです。\n',[_4乗値]). pow4(N,X) :- X is N * N * N * N. 整数を得る(_催促,_評価,_整数) :- 催促後に行入力(_催促,_行), 整数検査(_行,_整数), 評価(_評価). 催促後に行入力(_催促,_行) :- write(_催促), 行入力(_行). 行入力(_行) :- read_line_to_codes(current_input,_文字コードならび), atom_chars(_行,_文字コードならび). 整数検査(_行,_整数) :- atom_number(_行,_整数), integer(_整数). 評価(_評価) :- call(_評価).