[Pascal]Wczytywanie znaku z wejścia

Jak wczytać po jednym znaku linie z konsoli? Potrzebuje wczytać linie do tablicy.

ReadLn(s);

  for i:= 0 to Length(s) do
      tablica[i]:= s[i]; 

zrob sobie potrzebne zmienne.... chyba zadziala :P

Ech, a czemu nie po prostu Read(ch);, gdzie ch: char?? Po co to co jest proste komplikować??