diff options
author | Raphael McSinyx <vn.mcsinyx@gmail.com> | 2017-06-27 19:43:53 +0700 |
---|---|---|
committer | Raphael McSinyx <vn.mcsinyx@gmail.com> | 2017-06-27 19:44:10 +0700 |
commit | 6f155876eee25e7db2b3080e0bf2a737d1201073 (patch) | |
tree | 85e0346e0485026fdd0ec6e9b965fd84e9970499 /others/volume1/016.pas | |
parent | 91b5248c8b951d82f3c9a2deb6ac928cce553497 (diff) | |
download | cp-6f155876eee25e7db2b3080e0bf2a737d1201073.tar.gz |
Clean up
Diffstat (limited to 'others/volume1/016.pas')
-rw-r--r-- | others/volume1/016.pas | 12 |
1 files changed, 6 insertions, 6 deletions
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); |