| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Центр помощи > [Pascal] задача на записи |
| Автор: junkerman 29.3.2009, 21:35 |
| Снова даны описания type slovo=packed array[1..9] of char; nomertelefona=100000..9999999; znakomyi=record familiya:slovo; nomer:nomertelefona; end; stranica=array[1..20] of znakomyi; zapisnayakniga=array['a'..'z']of stranica; считая,что на каждой странице записной книжки указаны фамилии,начинаюшиеся с одной и той же буквы,описать функцию "номер(ЗП,Ф,НТ)"-определить,если ли в записной книге ЗП сведения о знаке с фамилией Ф,и если есть присвоить параметру НТ номер его телефона. Если кто поможет буду премного благодарен. |