前 次 新10 1- 板

---

596:デフォルトの名無しさん / :
let print_code n = print_char (char_of_int n);;
let rec foo ch x y z =
let next = ch + x in
if x = (-1) then print_code next
else (print_code next; (foo next (x + y) z ((z - y) mod 21)));;
foo (int_of_char 'N') 32 (-25) (-16);;

---

前 次

---

ir ver 1.0 beta2.2 (03/10/22)