b:=1;File standardInput foreach(a,a==b or(b=a)asCharacter print)