about summary refs log tree commit diff
path: root/12/TP-2008/R2/HC.pas
diff options
context:
space:
mode:
authorRaphael McSinyx <vn.mcsinyx@gmail.com>2016-11-06 11:13:14 +0700
committerRaphael McSinyx <vn.mcsinyx@gmail.com>2016-11-06 11:13:14 +0700
commit7de121c4b4ef888a0d1990c27144a7f9dd8c5f94 (patch)
tree2a298c9a957ad490cf8251ab264413f4effa9dce /12/TP-2008/R2/HC.pas
parente4767bb46d1d759f9c863704e3f347d2a0c8c49a (diff)
downloadcp-7de121c4b4ef888a0d1990c27144a7f9dd8c5f94.tar.gz
Thêm đề HSG 12 huyện Vĩnh Tường, Vĩnh Phúc
Diffstat (limited to '12/TP-2008/R2/HC.pas')
-rw-r--r--12/TP-2008/R2/HC.pas23
1 files changed, 0 insertions, 23 deletions
diff --git a/12/TP-2008/R2/HC.pas b/12/TP-2008/R2/HC.pas
deleted file mode 100644
index 8e6b182..0000000
--- a/12/TP-2008/R2/HC.pas
+++ /dev/null
@@ -1,23 +0,0 @@
-var
-  f : text;
-  m, n, i, j : byte;
-  a : array[1..200, 0..200] of smallint;
-
-function out
-
-begin
-  assign(f, 'HC.INP');
-  reset(f);
-  readln(f, m, n);
-  for i := 1 to m do
-    begin
-      a[i, 0] := 0;
-      for j := 1 to n do
-        read(f, a[i, j])
-    end;
-  close(f);
-  assign(f, 'HC.OUT');
-  rewrite(f);
-  writeln(f, out(a));
-  close(f)
-end;