Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Нужно считать текстовой файл до определённых слов. delphi

rust-02 © (2010-03-11 17:34:00)
есть программа с содержанием
hello
goodbye
bye
end
net
da
Написал цикл
while ( not eof(z) ) and ( i <= 10 ) and (a<>'end') do
begin
Readln(z,a);
inc(i);
end;
что не правильно?

Игорь Шевченко (2010-03-11 21:05:00) [1]

> когда пишу write(a[5]) он мне показывает net

net - 5-ое слово, что удивительно

Медвежонок Пятачок (2010-03-11 19:11:00) [2]
но показывает же

Leonid Troyanovsky (2010-03-11 19:11:00) [3]

> rust-02 © (11.03.10 19:02) [5]

> когда пишу write(a[5]) он мне показывает net

- А может это туя?
- ... И Тую найдем.

- А может это "пха"? Есть же такое грузинское дерево..или ... японское?

-Это "пих": жен. рода "пихта", а муж. - "пих".

--
Regards, LVT.

rust-02 (2010-03-11 19:02:00) [4]
но программа не работает.
когда пишу write(a[5]) он мне показывает net

Игорь Шевченко (2010-03-11 18:56:00) [5]

> но программа не работает

больно слышать.

rust-02 (2010-03-11 18:54:00) [6]
но программа не работает.
когда пишу write(a[5]) он мне показывает туе

Leonid Troyanovsky (2010-03-11 18:50:00) [7]

> Медвежонок Пятачок © (11.03.10 17:50) [1]

> хорошее содержание.

- Хорошая песня, молодцы, ребята! [День выборов]

:)

--
Regards, LVT.

Медвежонок Пятачок (2010-03-11 17:50:00) [8]
хорошее содержание.
хорошая программа.
все правильно.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »