RU/2: Форум. Общение пользователей и разработчиков OS/2 (eCS). : Ответить на сообщение
Имя:
e-mail:
FIDO:
Home page:
сохранить данные о вас
Тема:
> > ----- > > i = 0 > > do while lines(inFile) > 0 > > i = i + 1 > > Str.i = linein(inFile) > > end > > Str.0 = i > > ----- > > Не большая оптимизация: > do n=1 while lines(inFile) > 0 > Str.n=linein(inFile) > end /* while */ > Str.0=n > > Выполняется на 0,01 секунды быстрее.
_, _, _, _, _ _ _,_
(_ | / \ |\ | | |_/
, ) | , \ / | \| | | \
~ ~~~ ~ ~ ~ ~ ~ ~
Programmed by
Dmitri Maximovich
,
Dmitry I. Platonoff
,
Eugen Kuleshov
.
25.09.99 (c) 1999,
RU/2
. All rights reserved.
Rewritten by
Dmitry Ban
. All rights ignored.