From de5650a4375c1102572c8bb7a694e9c0068db29a Mon Sep 17 00:00:00 2001
From: Raphael McSinyx <vn.mcsinyx@gmail.com>
Date: Mon, 10 Oct 2016 10:55:59 +0700
Subject: Update /r/dailyprogrammer challenge #285 [Easy]

---
 daily/285easy/2enc.pas | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 daily/285easy/2enc.pas

(limited to 'daily/285easy/2enc.pas')

diff --git a/daily/285easy/2enc.pas b/daily/285easy/2enc.pas
new file mode 100644
index 0000000..96e58c5
--- /dev/null
+++ b/daily/285easy/2enc.pas
@@ -0,0 +1,22 @@
+var
+  fi, fo: text;
+  n, i: cardinal;
+
+
+begin
+  assign(fi, 'part2.inp');
+  assign(fo, 'part2.out');
+  reset(fi);
+  rewrite(fo);
+  repeat
+    repeat
+      read(fi, n);
+      for i := 1 to n div 255 do
+        write(fo, 255, ' ');
+      write(fo, n mod 255, ' ')
+    until eoln(fi);
+    writeln(fo)
+  until eof(fi);
+  close(fi);
+  close(fo)
+end.
-- 
cgit 1.4.1