pascal работа с файлами



Паскаль работа с файлами

Автор Леша задал вопрос в разделе Другие языки и технологии

Работа с файлами. PascalABC. и получил лучший ответ

Ответ от Saymon K[гуру]
А что книжки читать - это уже не модно?
Если серьезно, то чтобы паскаль понял с каким файлом ты собераешься работать то тебе надо на этот файл указать. Тогда паскаль сможет с ним работать.
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.

Ответ от Kaiu[гуру]
Все проще, попробуйте обучаться здесь допустим ссылка
А вот и пример ваш
Или кодом:
{Реализация задачи №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.

Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Работа с файлами. PascalABC.

Работа с файлами паскаль.
var
f: file;
s: string;
begin
ReadLn(s);
Assign(f, s);
Rewrite(f);подробнее...
спросили в User java User java 1
Как начать программировать с нуля!
надо просто начать читать что есть в сети и программировать все так делают

Модест
подробнее...

Как научиться программировать с нуля? Посоветуйте литературу какую нибуть.
Для ОБУЧЕНИЯ программированию я бы все же рекомендовал Visual Basic 6.0 - он намного легче, проще в
подробнее...
спросили в User alt
Можно ли самостоятельно научиться программированию? И с какого языка начинать?
Для ОБУЧЕНИЯ программированию я бы все же рекомендовал Visual Basic 6.0 - он намного легче, проще в
подробнее...
спросили в Язык Языки
Хочу научиться программировать. С какого языка программирования лучше начать?
На данное время разработано более 8500 различных компьютерных языков, разной сложности и
подробнее...
Ответ от 3 ответа[гуру]
Привет! Вот еще темы с похожими вопросами:

турбо паскаль
Доброго времени суток.

Вот пример рисования в паскале. Такой незамысловатый рисунок.подробнее...

Паскаль
Чтобы прочитать данные из ТЕКСТОВОГО файла, а не с КОНОЛИ, нужно открыть этот файл и прочесть:
подробнее...
спросили в BBS Id Software
люди, где можно найти сленг программистов на английском с русскими значениями
запросец оригинальный . я думаю если взять сразу такие книги как : самаучитель по дельфи и паскалю
подробнее...
спросили в POS
вот, Паскаль.
1) Erase, Flush.
2) Проверяется условие продолжения выполнения цикла, выполняется тело цикла
подробнее...

С чего начать программирование
Лиля вздор пишет. Попробуйте начать прямо с JAVA.

Java ничуть не сложнее других
подробнее...
спросили в Champ Car
Pascal, чтение из файла
Если в файл вы записали блокнотом символы 12, то и объявляйте свой файл fr как текстовый, а не как
подробнее...
спросили в Visual Basic NET Vivendi
Помогите найти сайт!! ! Сайт программирование для начинающих, самых начинающих!!
На данное время разработано более 8500 различных компьютерных языков, разной сложности и
подробнее...
спросили в User alt
Язык программирования для начинающих?
Оу, с PHP вообще не стоит начинать прогать, начни с азов, с паскаля, ну можно и Си.
Книги есть
подробнее...
спросили в Язык
Хочу научиться языкам программирования! где найти самоучитель?
Для ОБУЧЕНИЯ программированию я бы все же рекомендовал Visual Basic 6.0 - он намного легче, проще в
подробнее...
 

Ответить на вопрос:

Имя*

E-mail:*

Текст ответа:*
Проверочный код(введите 22):*