diff options
Diffstat (limited to '12/TP-ThanhHoá-2009/bai4pas_srcgen.py')
-rwxr-xr-x | 12/TP-ThanhHoá-2009/bai4pas_srcgen.py | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/12/TP-ThanhHoá-2009/bai4pas_srcgen.py b/12/TP-ThanhHoá-2009/bai4pas_srcgen.py new file mode 100755 index 0000000..e345caa --- /dev/null +++ b/12/TP-ThanhHoá-2009/bai4pas_srcgen.py @@ -0,0 +1,19 @@ +#!/usr/bin/env python3 + +from bai4 import libai4 + + +with open("BAI4.PAS", "w") as f: + f.write("const\n m: array[1..9] of byte = (") + l = [libai4(i) for i in range(1, 10)] + f.write(", ".join([str(len(i)) for i in l])) + f.write(");\n equa: array[1..9] of ansistring = (\n"); + l0 = [] + for i in l: + s = " #10" + "".join(["'" + j.replace("\n", "'#10") for j in i]) + l0.append(s) + f.write(",\n".join(l0)) + f.write("\n );\n\nvar\n n: byte;\n f: text;\n\nbegin\n") + f.write(" assign(f, 'BAI4.INP');\n reset(f);\n read(f, n);\n") + f.write(" close(f);\n\n assign(f, 'BAI4.OUT');\n rewrite(f);\n") + f.write(" write(f, m[n], equa[n]);\n close(f)\nend.\n") |