IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> Что за операторы?
сообщение
Сообщение #1


Бывалый
***

Группа: Пользователи
Сообщений: 212
Пол: Мужской

Репутация: -  0  +


Не знал писать сюда или нет.

Вот такая предшествующая теоретическая часть
Код

В данной работе рассматривается связное представление списков.
Для организации связного списка в примере используется два массива и две переменные,
отвечающие за адрес первого элемента информационного списка (first) и
адрес первого элемента списка свободного пространства (avail).
Список свободного пространства занимает все ячейки,
которые не заняты информационными списками внутри массивов.


далее Пример реализации задания



program ds_01;
uses ds_unit;
var first: integer;
len: integer;

procedure lst_len(lst:integer; var len:integer);
{ Входы: lst - указатель списка;
Выходы: len - длина списка;
Гл. имена: link - массив полей связи;
Функция: Определение длины len списка lst.
}
var p: integer;
begin
p:=lst; len:=0;
while p<>0 do begin len:=len+1; p:=link[p]; end;
end; {lst_len}

begin
rdblock;
write('First: '); readln(first);
lst_len(first,len);
writeln('Len: ',len);
wrblock;
writeln('First: ',first);
escwait;
end.




не нашел описание массива и то что не понял выделил красным, что это за операторы?

 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






Цитата
что это за операторы
Это не операторы, а вызовы процедур. Что это за процедуры - надо спросить у автора модуля ds_unit...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Профи
****

Группа: Пользователи
Сообщений: 652
Пол: Мужской
Реальное имя: Алексей

Репутация: -  20  +


Ну это даже не пример а какой то кусок неизвестный.Насчет "красных" процедур как подметил Volvo...Первая это не что иное как read block,тобиш чтение блока,второе write block,оно же запись блока,а третья это escape wait,тобиш ожидание выхода.Я смею предположить что массивы либо описаны внутри первых 2 либо вообще как то вынесены из программы.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Бывалый
***

Группа: Пользователи
Сообщений: 212
Пол: Мужской

Репутация: -  0  +


Всем спасибо, все нашел, будем разбираться)

Сообщение отредактировано: Account -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 20.04.2024 13:03
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name