Другие языки программирования и технологии

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

Пожалуйста, помогите разобраться с файлами в паскале, на примере такой задачи: Дано два числа, найти их сумму. При этом числа взять из файла input.txt, а результат записать в файле output.txt.
Пример:

input.txt:

3 5

output.txt:

8
А что книжки читать - это уже не модно?

Если серьезно, то чтобы паскаль понял с каким файлом ты собераешься работать то тебе надо на этот файл указать. Тогда паскаль сможет с ним работать.
assign(F, 'Input.txt'); здесь F переменная файлового типа, т. е var. F: Text; При чем именно текстового файла. Далее сам Паскаль не знает что тебе с этим файлом нужно делать. То ли ты в него записывать собираешься то ли ты из него читать данные будешь. Поэтому для первого делаем Rewrite(F); для второго Reset(F);

Потом уже считаем данные либо записываем их. Read(F, x); - мы читаем данные. x - это переменная куда мы данные из файла запишем. Write(F, x); - мы записываем данные. А этом случае мы из x берем данные а в F записываем.

Ну и конечно закрываем файлы. Это обязательная процедура. Close(F);

var Inp, Outp: Text; // переменная файлового типа
x, y: integer;
begin
assign(Inp, 'Input.txt');
assign(Outp, 'Output.txt');
Reset(Inp);
Rewrite(Outp);

Read(Inp, x); // читаем данные
Read(Inp, y);

x := x + y;

Write(Outp, x); // пишем данные

Close(Inp); // закрываем файлы
Close(Outp);
end.
Олжас Артыков
Олжас Артыков
1 184
Лучший ответ
Все проще, попробуйте обучаться здесь допустим http://acmp.ru
А вот и пример ваш http://acmp.ru/article.asp?id_text=118

Или кодом:

{Реализация задачи №1 "A+B" на Pascal}
var a, b : longint;

begin
assign(input, 'input.txt'); reset(input);
assign(output, 'output.txt'); rewrite(output);
read(a, b);
write(a + b);
end.
ШП
Шут Павел
69 958