="justify">} (); (); ("cls");
}
/***** Функція видалення запису *****/Udal (char fst [15])
{system ("cls"); telephone * p, * q, * r, * h; fcon [10]; clrscr (); (f1 == NULL) printf ("Таблиця порожня n ");
{= f1; (h! = NULL)
{= h; (strcmp ((* p). number, fst) == 0)
{((p-> prev! = NULL) && (p-> next! = NULL))
{= p-> prev; = p-> next;> next = r;> prev = q; (p);
} ((p-> prev == NULL) && (p-> next! = NULL))
{= p-> next;> prev = NULL; (p); = q;
} ((p-> prev == NULL) && (p-> next == NULL))
{(p); = NULL;
} ((p-> next == NULL) && (p-> prev! = NULL))
{= p-> prev;> next = NULL; (p);
};
} = h-> next;
}
}
} change (char fst [15])
{system ("cls"); telephone * f; clrscr (); = f1; (f! = NULL)
{ if (strcmp ((* f). number, fst) == 0)
{(); ("ввела прізвище абонента:"); (f-> surname); ("Його ім'я:"); (f-> name); ( "І по-батькові:"); (f-> lastname); ("Номер телефону:"); (f-> number); ("Рік встановлення телефону:"); (f-> ; year); ("Заборгованість абонента:"); ("% d", & f-> score);
} = f-> next;
}
}
/***** Функція пошуку запису *****/Poisk ()
{char s [15]; telephone * f; ch, flag = 0; ("cls"); clrscr (); = f1;// почати з початку списку (f == NULL )// якщо список відсутня
{printf ("База даних ще не заповнена. n"); (); ();
}
{ printf ("Введіть номер телефону:"); ("% s", s); ("База даних абонентів телефонної мережі n" ); ("| Прізвище | Ім'я | По батькові | Номер | Рік | Борг | n"); (f! = NULL)// доти поки список не закінчиться
{(strcmp ((* f). number, s) == 0)
{("|% 15s", f-> surname); ("|% 12s", f-> name); ("|% 15s", f-> ; lastname); ("|% 12s", f-> number); ("|% 6s", f-> year); ("|% 6d", f-> score); ( "| n"); = f-> next;// перехід на наступний запис + +;
} f = f-> next;
} (flag == 0) {system ("cls"); printf ("Запис не знайдено ..."); getchar (); getchar ();}
{(" nДальнейшія дії? n (1 - Видалити запис, 2 - Змінити запис, 3 - Повернення в меню):"); ("% d", & ch ); (ch)
{1: Udal (s); 2: change (s); 3: system ("cls");
}
}
}
}
/*...
