/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/CompilationSamples/LinkedList.pas
27 строк
605 B
Artem Pelenitsyn
change encoding for all *.pas and *.cs files: cp1251 -> utf-8
28 дек 2015, 14:25
28 дек 2015, 14:25
49378a6
Код
Авторство
О чём код?
// Использование LinkedList - двусвязного списка стандартной библиотеки - и его итератора uses System.Collections,System.Collections.Generic; procedure print(l: ICollection); begin foreach x: integer in l do write(x,' '); writeln; end; var l: LinkedList<integer> := new LinkedList<integer>; begin l.AddLast(3); l.AddLast(5); l.AddLast(7); l.AddFirst(2); print(l); var a := new integer[10]; l.CopyTo(a,0); print(a); var lit: LinkedListNode<integer> := l.Find(5); l.AddBefore(lit,777); print(l); end.