(ff,"% s ", & (f-> number)); (ff, "% s", & (f-> year)); (ff, "% d", & (f-> score)); (f1 == NULL)
{
(* f). next = NULL;
(* f). prev = NULL; = f; = f;
}
{
(* f). next = NULL;
(* f). prev = f2;
(* f2). next = f; = f;
}
} ("Абоненти успішно завантажені. n"); (ff);
} ("Ошибочка вийшла з файлом datebase.db! n"); (); ();
}
/***** Функція виведення бази даних на екран *****/Print ()
{telephone * f;// * f - вказівник на структуру ("cls"); = f1;// почати з початку списку (f == NULL)// якщо список відсутній (" ; База даних ще не заповнена. n "); (f! = NULL)
{("База даних абонентів телефонної мережі n"); ("| Прізвище | Ім'я | По батькові | Номер | Рік | Борг | n"); (f! = NULL)//доти поки список не закінчиться
{("|% 15s", f-> surname); ("|% 12s", f-> name); ("|% 15s", f-> ; lastname); ("|% 12s", f-> number); ("|% 6s", f-> year); ("|% 6d", f-> score); ( "| n"); = f-> next;// перехід на наступний запис
}
} (); ();
}
/***** Відомість заборгованості з оплати *****/Dolschnik ()
{telephone * f; dolg; * ff; = fopen ("Dolschnik.txt", "w");// відкрити порожній файл для запису ("cls"); = f1 ;// на початок списку (f == NULL)// якщо список відсутній ("База даних ще не заповнена. n"); (f! = NULL)
{("Абоненти, заборгованість яких склала вище якої суми необхідно вивести? nДолг>"); ("% d", & dolg); ("Відомість заборгованості з оплати n "); (" Абоненти із заборгованістю вище% d n ", dolg); (" | Прізвище | Ім'я | Борг | "); (ff," Відомість заборгованості з оплати n "); (ff , "Абоненти із заборгованістю вище% d n", dolg); (ff, "| Прізвище | Ім'я | Борг |"); (f-> next! = NULL)// поки не закінчиться список p>
{(f-> score> dolg)
{ printf (" n"); ("|% 15s", f-> surname); ("|% 12s", f -> name); ("|% 6d |", f-> score); (ff, " n"); (ff, "|% 15s", f-> surname); (ff, "|% 12s", f-> name); (ff, "|% 6d |", f-> score);
} = f-> next;
} (f-> score> dolg)
{ printf (" n"); ("|% 15s", f-> surname); ("|% 12s", f -> name); ("|% 6d |", f-> score); (ff, " n"); (ff, "|% 15s", f-> surname); (ff, "|% 12s", f-> name); (ff, "|% 6d", f-> score);
} (ff, " 0");// " 0" - кінець рядка (" n Nбаз даних збережена! Поздравляю! ... n"); ( ff);
} (); ();
}