読者です 読者をやめる 読者になる 読者になる

個人的自由ノート

ふと自分が気になった事を書いてます

OCamlで問題を解く

let x = 63.4
let y = 18.3;;

print_string("xの値は" ^ string_of_float(x) ^ "です。\n");;
print_string("yの値は" ^ string_of_float(y) ^ "です。\n");;
print_string("合計は" ^ string_of_float(x +. y) ^ "です。\n");;
print_string("平均は" ^ string_of_float((x +. y) /. 2.) ^ "です。\n");;



let x = 63
let y = 18
let z = 52
let xyz = x + y + z        
let ave = xyz / 3;;

print_string("xの値は" ^ string_of_int(x) ^ "です。\n");;
print_string("yの値は" ^ string_of_int(y) ^ "です。\n");;
print_string("zの値は" ^ string_of_int(z) ^ "です。\n");;
print_string("合計は" ^ string_of_int(xyz) ^ "です。\n");;
print_string("平均は" ^ string_of_int(ave) ^ "です。\n");;



print_string "整数値 : ";;
let x = read_line();;
print_string(x ^ "と入力しましたね。");;
print_newline();;