Задача:
Одно из возможных представлений длинного текста- это разделить его на строки равной длины и создать массив ссылок на эти строки;
const
D=...; Длина строки
N=...; максимальное число строк
type
ST=STRING[D];
PTRSTR=^ST;
MYTEXT=ARRAY[1..N] of PTRSTR;
VAR
T:MYTEXT; *-T:^MYTEXT;
Если в тексте менее N строк, то последние элементы массива равны NIL; в начале массива ссылок NIL не должно быть. Если в операции над текстом указан номер отсутствующей строки, т.е. элемент массивас этим номером равен NIL, то такая операция не выполняется.
Задание:
Описать логическую функцию Sourch(t,c,i,j), определяющую, входит ли литера c- в текст t, и, если входит, присваивающую параметрам i и j "координаты" первого вхождения этой литеры: i- номер строки, j-номер позиции в строке.
ЦЕНЫ, ПРЕДЛОЖЕНИЯ И Т.Д. пишем либо тут, а лучше в аську ... Никаких ICQ - контакты - через форум. Так что соизволь зарегистрироваться!.