Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 2 347

/ вопрос открыт /

Приветствую, уважаемые эксперты! При решении олимпиадных школьных задач по программированию на Pascal мы столкнулись с условием, что исходные данные задачи должны импортироваться из некоего файла, а результат решения в другой файл. Если можете, укажите источник информации, в котором можно познакомиться с механиникой данного процесса.
Суважением,Хоршев Алексей.

Хоршев Алексей Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Хоршев Алексей (статус: Посетитель)
Вопрос отправлен: 24 января 2009, 11:22
Состояние вопроса: открыт, ответов: 2.

Ответ #1. Отвечает эксперт: Ученый

Здравствуйте, Хоршев Алексей! Полностью соглашусь с Вадимом К, что решить эту проблему вам помогут Assign, Rewrite, Reset и тд.
Информации об этом в интернете полно. Вот вам несколько ссылок:
1. http://informatics.lgg.ru/pascal10.html
2. http://pascal.helpov.net/index/files_pascal_programming
3. http://window.edu.ru/window_catalog/pdf2txt?p_id=8824&p_page=5
4. http://www.cyberforum.ru/pascal/thread16011.html

З.Ы. Удачи! :)

Ответ отправил: Ученый (статус: 8-ой класс)
Время отправки: 24 января 2009, 14:44
Оценка за ответ: 5

Комментарий к оценке: Благодарю за исчерпывающий ответ.

Ответ #2. Отвечает эксперт: Ruslan

Здравствуйте, Хоршев Алексей!
Работа с файлами
var f,f1:text;
a:integer;
begin
assign(f,'inp.txt');{initialization}{f - failovaya peremennaya}
reset(f); {chtenie dannih iz Faila} {fail nushno sozdat predvaritelno}
assign(f2,'out.txt');{initialization}
rewrite(f2); {perezapis'} {fail moshet bit' i ne sozdan}
read(f,a);{для того, чтобы прочитать информацию из файла}
write(f2,a);{записали переменную а в файл f2}
close(f);close(f2); обязательно закрыть файлы после завершения работы с ними
write('The end of job');
readln
end.
и еще одно, чтобы полностью не переписывать файл, а добавить в него данные нужно использовать
append(f);

удачи!

Ответ отправил: Ruslan (статус: 1-ый класс)
Время отправки: 24 января 2009, 22:46
Оценка за ответ: 3

Комментарий к оценке: Ответ хоть и компактный, но точно по существу вопроса, а также ценен как шпаргалка в случае "провала памяти". Большое спасибо.

Мини-форум вопроса

Всего сообщений: 6; последнее сообщение — 25 января 2009, 13:55; участников в обсуждении: 4.
Вадим К

Вадим К (статус: Академик), 24 января 2009, 12:18 [#1]:

м, изучить функции Assign, reset, rewrite, close ?
Галочка "подтверждения прочтения" - вселенское зло.
Тамара

Тамара (статус: Посетитель), 24 января 2009, 15:06 [#2]:

неужели в школах нормальное программирование преподавать стали?
Ученый

Ученый (статус: 8-ой класс), 24 января 2009, 15:26 [#3]:

to Тамара...паскаль в школах пора бы заменить на делфи....но что-то не особо то торопятся заменить :)
Amidamaru

Amidamaru (статус: 4-ый класс), 24 января 2009, 22:16 [#4]:

в интситуте то по паскалю задачки для 5 класса решить не могут... а ты делфи в школах реподавать собрался ...

но хотябы записи и работу с файлами можно в школьную программу включить
Приглашаю Вас на наш IRC-канал: #delphiintru в сети DalNet.
Тамара

Тамара (статус: Посетитель), 25 января 2009, 09:51 [#5]:

мне в школе информатику преподавали на уровне: "это компьютер, его включают так!". В институте 2 семестра фортрана на ЕС-ках и 1 лаба на бейсике! Мне правда, удивителен даже паскаль в программе!
Ученый

Ученый (статус: 8-ой класс), 25 января 2009, 13:55 [#6]:

Тамара-сейчас во многих школах прешли на VB... луше бы переходили на делфи:)

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:43
Выполнено за 0.05 сек.