Работа с файлами

[regdark]

Создайте папку, в ней создайте два текстовых файла: input.txt - ввод и output.txt - вывод. Файл программы должен быть в той же папке!
Напишите в файле к примеру 6-ь чисел "1 2 3 4 5 6"(в одну строчку и через пробел). Результат получите в файл output.txt.
А вот и сам код программы, тестировал в Pascal ABC:

var f:text;
n,i:integer;
a: array [1..1000] of integer;

begin
assign (f,'input.txt'); reset(f);
n:=0; i:=0;
while not(eof(f)) do
begin
inc(n); inc(i);
read(f,a[i]);
end;
close(f);
assign (f,'output.txt'); rewrite(f);
i:=n;
while i<>0 do begin
write (f,a[i],' ');
i:=i-1;        end;
close(f);
end.

[Poma][a]

А от нас-то ты чего хочешь?

И да.. Папку ты не создаешь

[regdark]

почему не создаю?

[Poma][a]

Это у тебя спросить надо.. Ты создаешь файл.. А нужно папку в файле..

[Stilet]

А нужно папку в файле..

Улыбатели - на старт!
Ну Ромаха, ты мегакрут
Во-первых создать папку нужно вручную. Поместить туда input.txt. И программу.
А во-вторых папку в файле - это к ZIP технологиям.

P.S. А вот чего автор от нас хочет даже я не понял...

[FIDE]

По идее автор хотел переписать числа из одного файла в другой.