|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
23.03.2009, 21:03 | #1 |
Регистрация: 20.11.2008
Сообщений: 5
|
Паскаль. Файлы
Дан текстовый файл. Найти количество абзацев в тексте, если каждый абзац начинается с красной строки (5 пробелов). Пустые строки между абзацами не учитывать.
Код:
Последний раз редактировалось Stilet; 24.03.2009 в 09:02. |
24.03.2009, 00:57 | #2 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
24.03.2009, 04:11 | #3 | |
Пользователь
Регистрация: 20.03.2009
Сообщений: 32
|
Цитата:
|
|
24.03.2009, 07:07 | #4 |
Регистрация: 20.11.2008
Сообщений: 5
|
alex_fcsm спасибо большое
|
24.03.2009, 08:12 | #5 |
Злобстер
Форумчанин
Регистрация: 19.03.2009
Сообщений: 134
|
DENCREAT
Переменная m здесь вообще по-моему лишняя. Нас не просят найти кол-во строк.
От знаний ещё никто не умирал, но рисковать не стоит.
|
24.03.2009, 08:22 | #6 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
А я бы исходя из условия так написал:
Код:
I'm learning to live...
|
24.03.2009, 08:25 | #7 |
Злобстер
Форумчанин
Регистрация: 19.03.2009
Сообщений: 134
|
Stilet
а если у меня в середине строки 5 пробелов будет? твой код не прокатит Вот мой вариант) Чуток изменю вариант Stilet-а Код:
От знаний ещё никто не умирал, но рисковать не стоит.
|
24.03.2009, 09:04 | #8 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
24.03.2009, 13:20 | #9 |
Форумчанин
Регистрация: 22.12.2008
Сообщений: 104
|
if pos(' ',s)=1 then inc(n);
@(o_0)@
|
24.03.2009, 13:42 | #10 |
Злобстер
Форумчанин
Регистрация: 19.03.2009
Сообщений: 134
|
А это что такое?? Тут же у нас надо учесть что абзац с 5 прбелов начинается не с 1
От знаний ещё никто не умирал, но рисковать не стоит.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Файлы!Паскаль | ТРОЯН=) | Помощь студентам | 1 | 23.03.2009 10:08 |
Задача на файлы (Паскаль) | Pihan | Помощь студентам | 6 | 17.03.2009 13:15 |
Паскаль, файлы, задачка | LikFiR | Помощь студентам | 1 | 06.03.2009 23:46 |
Паскаль!Прога на файлы! | vlad1991 | Помощь студентам | 20 | 28.02.2009 22:00 |