Скачать: CL | DM;

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

← →
rust-02 ©   (2010-03-11 17:34) [0]

есть программа с содержанием
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 17:50) [1]

хорошее содержание.
хорошая программа.
все правильно.

---

← →
Leonid Troyanovsky ©   (2010-03-11 18:50) [2]

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

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

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

:)

--
Regards, LVT.

---

← →
rust-02 ©   (2010-03-11 18:54) [3]

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

---

← →
Игорь Шевченко ©   (2010-03-11 18:56) [4]

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


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

---

← →
rust-02 ©   (2010-03-11 19:02) [5]

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

---

← →
Медвежонок Пятачок ©   (2010-03-11 19:11) [6]

но показывает же

---

← →
Leonid Troyanovsky ©   (2010-03-11 19:11) [7]

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

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

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

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

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

--
Regards, LVT.

---

← →
Игорь Шевченко ©   (2010-03-11 21:05) [8]

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


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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.045 c