Submission #2823474

---

Source Code Expand

const
  n3 = "not not not"
  n3s = "not not not "
  n2s = "not not "
  n1s = "not "

var
  S = readLine stdin
  T =  ""

proc judge(S, s: string): bool =
  if S.len >= s.len and S[0 .. s.high] == s:
    return true

while S.len != 0 and S != n3:
  if judge(S, n3s):
    add T, n1s
    S = S[n1s.len .. ^1]
  elif judge(S, n2s):
    S = S[n2s.len .. ^1]
  else:
    add T, S[0]
    S = S[1 .. ^1]

echo T & S

Submission Info

Compile Error

Hint: system [Processing]
Hint: Main [Processing]
Hint:  [Link]
Hint: operation successful (9922 lines compiled; 1.603 sec total; 10.107MB; Release Build) [SuccessX]

Judge Result