From 6f155876eee25e7db2b3080e0bf2a737d1201073 Mon Sep 17 00:00:00 2001 From: Raphael McSinyx Date: Tue, 27 Jun 2017 19:43:53 +0700 Subject: Clean up --- others/volume1/016.pas | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'others/volume1/016.pas') diff --git a/others/volume1/016.pas b/others/volume1/016.pas index e50eef0..510a029 100644 --- a/others/volume1/016.pas +++ b/others/volume1/016.pas @@ -11,12 +11,12 @@ begin repeat inc(i); while (j > 0) and - (k > 0) and - (s[i] > z[j]) do - begin - dec(j); - dec(k) - end; + (k > 0) and + (s[i] > z[j]) do + begin + dec(j); + dec(k) + end; inc(j); z[j] := s[i] until i = length(s); -- cgit 1.4.1