non stavo chiedendo che ciclo usare ma come risulta il comando read all'interno del ciclo:
ad esempio
codice:
for i:=1 to n do
    begin
         write('Immetti stringa ',i,' : ');
         read(Che espressione uso per leggere l'elemento della lista?);
    end;