ФАЙЛИ

[misha25525]

Дано символьний файл f. Записати у файл g компоненти файла f у зворотному порядку. в Паскале

[ROMA2PVT]

    program cx;
      var
        mas:array[1..100] of string;
       n,i:integer;
       s,k1:string;
       j,p:text;
    begin
       assign(j,'C:\input.txt');
       reset(j);
         n:=0;
          while not eof(j) do
    begin readln(j,s);
      n:=n+1;
       k1:='';
         for i:= 1 to length(s) do k1:= s[i]+k1;
          mas[n]:=k1;
end;
Close(j);
       assign(p,'C:\output.txt');
       rewrite(p);
       for i:= 1 to n do
       begin
       writeln(p,mas[i]);
       end;
       Close(p);
end.

Лови.

[Google2010]

имхо в обратном порядке
это :
1 запись станет последней
2 -предпоследней и т.д.

[ROMA2PVT]

Я так не думаю.Ну посмотрим что имел ввиду автор.