I think that following two input routines are the same:
#1, gets AC
-------------------------
ReadLn(N);
For I := 1 To N Do
 begin
  For J := 1 To N Do
   begin
    Read(Ch);
    <work>
   end;
  ReadLn;
 end;
----------------------
#2, gets WA on test 4
----------------------
Read(N);
Read(Ch);
For I := 1 To N Do
 For J := 1 To N Do
  begin
   While Not((Ch = 's')Or(Ch = 'S')) Do Read(Ch);
   <work>
   Read(Ch);
  end;
-----------------------------
Where am I mistake?

in windows - end of string is a 2 symbols: ord (ch)=13 and
ord (ch)=10

Please send me our sourse code.
J get WA on test#4 :~))

I got accepted with simple algorithm.
There is no incorrect tests.

to Gheorghe Stefan:I didn't say that it's impossible to get AC. I got it too.
I ask you are input routines the same. I think they are. Profound parts of this two programs are the same too, so why don't they give the same result?
to JUDGES: can you give any comments?

Tests were corrected.
Problem was rejudged.

Thank you.