занесення

Приклад 1:
Діти чиновних батьків здебільшого прагнули не до знань — їхньою головною метою було занесення до шкільних списків. Вчителі, до яких записувалась ціла орава учнів, могли передати свої знання тільки небагатьом із них.
— Невідомий автор, “003 %91%92%8E%90 %9F %91%92%80%90%8E%84%80%82%8D%9C%8E%83%8E %91%95%8E%84%93 %8E.%8F. %8A%E0%A8%A6%A0%Ad %A2%E1%Ec%Aa%A8%A9 %8A%A8 %A2 %8B%A8%A1 %A4%Ec, 2002. 592 %E1. Isbn 966 06 0245 6”

Приклад 2:
Капища вимагали від християнина не вивчення, не занесення їх описів до християнських писань, а зни- щення 840, забуття, але не пропаганди давніх забобонів та імен841. Поган- ські божки однозначно сприймалися нашими книжниками як біси, а по- минати ім’я сатани – не є християнською чеснотою 842. a 212 b 839 Див.
— Жиленко Ірина, “Євангеліє від ластівки”

Приклад 3:
Динамічні структури даних 417 Форма після введення даних матиме вигляд: Після натискання на кнопку “Розв’язок” форма матиме вигляд: Текст програми : struct Elem // Оголошення елемента черги AnsiString gorod; // Рядок – назва міста int nas; // Ціле число – кількість населення міста Elem *next; // Покажчик на наступний елемент черги (адреса) ; // Оголошення покажчиків на початок і кінець черги та їхнє початкове обнулення Elem *first=0, *last=0; void add (AnsiString S, int d) // Долучення елемента до черги Elem *c=new Elem; // Виділення пам’яті під новий елемент черги c->gorod=S; // Занесення до нового елемента назви міста c->nas=d; // Занесення до нового елемента кількості населення c->next=0; // Після нового елемента інших елементів покищо немає if(first==0)first=c;// Якщо черги ще нема, то новий елемент стає першим else // Інакше елемент долучається після останнього, last->next=c; // записуючи в last адресу нового елемента Розділ 12 418 last=c; // Тепер новий елемент стає останнім void del() // Вилучення першого елемента черги if(first==0) // Якщо черга є порожня, виводиться повідомлення і виконання ShowMessage(“Черга порожня”); return; // переривається Elem *c=first; first=first->next; // first указує на той елемент, який раніше був другим delete c; // Знищення елемент, який вилучається void print() // Виведення черги в Memo Form1->Memo1->Clear(); Elem *c=first; while(c!=0) Form1->Memo1->Lines->Add(c->gorod+” “+IntToStr(c->nas)); c=c->next; // Переходження до наступного елемента черги AnsiString udal() // Вилучення з черги всіх міст до міста // Вилучення з черги всіх міст до міста з максимальним населенням if(first==0) // Якщо черга є порожня, ShowMessage(“Черга порожня”); // виводиться повідомлення return “”; // і виконання переривається //Пошук міста з максимальним населенням int max=first->nas; // Початкове значення максимального населення – // населення першого міста AnsiString maxgor=first->gorod; // Початкове значення міста // з максимальним населенням – назва першого міста. Elem *c=first->next; // Цикл розпочинається з другого елемента черги while(c!=0) if(c->nas > max) // Якщо населення міста більше максимального, max=c->nas; // у max запам’ятовується кількість населення міста maxgor=c->gorod; // та його назва c=c->next; // Вилучення з черги всіх міст аж до міста з максимальним населенням c=first; while(c!=0 && c->gorod!=maxgor) // Допоки не дісталися міста, del();//з максимальним населенням, вилучається перший елемент черги c=first; return maxgor; void clean () // Очищення пам’яті while(first!=0) del(); // Кнопка “Долучити” void __fastcall TForm1::Button1Click(TObject *Sender) AnsiString S=Edit1->Text; int d=StrToInt(Edit2->Text); add (S, d); Динамічні структури даних 419 // Кнопка “Переглянути” void __fastcall TForm1::Button2Click(TObject *Sender) print(); // Кнопка “Вилучити” void __fastcall TForm1::Button3Click(TObject *Sender) del(); print(); // Кнопка “Очистити” void __fastcall TForm1::Button5Click(TObject *Sender) clean(); Edit1->Clear(); Edit2->Clear(); Edit3->Clear(); Memo1->Clear(); //Кнопка “Розв’язок” void __fastcall TForm1::Button4Click(TObject *Sender) Edit3->Text = udal(); print(); 12.4 Вставлення і вилучення елементів списку Список дозволяє вставити новий елемент поміж якими завгодно елемен- тами.
— Невідомий автор, “132 Trofimenko Og Prokop Iuv Shvaiko Ig Ta Inc Osnovi Programuva Tech”