Помогите пожалуйста с задачей на файлы! - Помощь студентам

Fatality · 22.04.2009, 18:07

Здравствуйте! Помогите пожалуйста! Нужно решить задачу к завтрашнему дню, а я совсем не понял как ее делать...

Помогите плиииз!!!
"Создайте текстовый файл P, разбитый на непустые строки. Составьте программу нахождения максимальной длины сторки"

Sazary · 22.04.2009, 18:27

Цитата:

а я совсем не понял как ее делать...

Что конкретно непонятно?

Создаете файл.
Заполняете его строками.
Закрываете файл.

Открываете файл для чтения.
В цикле считываете очередную строку и считаете ее длину.
Если длина больше максимума. то максимум = длине.
Закрываете файл.
Выводите максимальную длину.
---------------
Какой пункт неясен?

Fatality · 22.04.2009, 18:46

Всё...

Дело в том, что я полный ламер в паскале... С первого семестра задачки получались, а сейчас хоть убей не могу сделать... Спасибо, сейчас попробую что-нибудь понять и попробывать сделать)

Fatality · 22.04.2009, 20:33

Блин... Ниче не получается... Пожалуйста, помогите сделать!

DM_bite · 22.04.2009, 20:35

Цитата:

Блин... Ниче не получается... Пожалуйста, помогите сделать!

Ну не может же все не получаться? Верно?

Если проблема с конкретным пунктом алгоритма, представленного Sazary, пишите. А так, ответ дан в первом посте.

Sazary · 22.04.2009, 20:37

Цитата:

С первого семестра задачки получались, а сейчас хоть убей не могу сделать..

Не верится как-то. Крайне неубедительно.

Алгоритм выше. Для каждого пункта выпишите необходимые процедуры и функции.
Например, для первого пункта:
Создаете файл.
assign, rewrite

Когда сделаете это, начинайте расставлять их в нужном порядке (не бездумно, естественно, а складывая в программу). И вот когда возникнут конкретные вопросы - спрашивайте.

Fatality · 22.04.2009, 22:25

Так... Дошел до этого пункта: "В цикле считываете очередную строку и считаете ее длину." Как это сделать, подскажите)

Sazary · 22.04.2009, 22:43

Код:

s := '';
while not eoln(f) do
 begin
 read(f,c);
 s := s+c;
 end;

Теперь в s - строка.

22.04.2009, 18:07	#1
Fatality Пользователь Регистрация: 03.12.2008 Сообщений: 37	Помогите пожалуйста с задачей на файлы! Здравствуйте! Помогите пожалуйста! Нужно решить задачу к завтрашнему дню, а я совсем не понял как ее делать... Помогите плиииз!!! "Создайте текстовый файл P, разбитый на непустые строки. Составьте программу нахождения максимальной длины сторки"

22.04.2009, 22:43	#8
Sazary В тени Старожил Регистрация: 19.12.2008 Сообщений: 5,788	Код: `s := ''; while not eoln(f) do begin read(f,c); s := s+c; end;` Теперь в s - строка. Вполне очевидно, чтобы что-то понять, необходимо книги читать. Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
F1!!! Помогите с экономической задачей на файлы! Срочно(до 02.04.2009)!!	Farridjan	Помощь студентам	1	31.03.2009 21:53
Помогите с задачей на файлы!(Pascal)	Fatality	Помощь студентам	5	11.03.2009 18:07
Паскаль. Файлы. Помогите с одной задачей	RomT24	Помощь студентам	5	07.03.2009 16:38
Помогите с задачей на файлы	Fatality	Помощь студентам	5	12.02.2009 19:03
Помогите с задачей (файлы) на Delphi	Oksana11	Помощь студентам	18	11.01.2008 23:11

22.04.2009, 18:46	#3
Fatality Пользователь Регистрация: 03.12.2008 Сообщений: 37	Всё... Дело в том, что я полный ламер в паскале... С первого семестра задачки получались, а сейчас хоть убей не могу сделать... Спасибо, сейчас попробую что-нибудь понять и попробывать сделать)

22.04.2009, 20:33	#4
Fatality Пользователь Регистрация: 03.12.2008 Сообщений: 37	Блин... Ниче не получается... Пожалуйста, помогите сделать!

22.04.2009, 22:25	#7
Fatality Пользователь Регистрация: 03.12.2008 Сообщений: 37	Так... Дошел до этого пункта: "В цикле считываете очередную строку и считаете ее длину." Как это сделать, подскажите)