/* p103_14;{9} */                                                 // program p103_14;{9}
#include <conio.h>                                                // uses crt;
#include <stdio.h>                                                // {uses system;}
#include <string.h>
#define nm 100                                                    // const nm=100;

                                                                  // type
typedef char Nume[20];                                            // Nume = string[20];

typedef struct {                                                  // Addr=record
            Nume Strada;                                          //   Strada:Nume;
            unsigned short Nr;                                    //   Nr:word;
        } Addr;                                                   // end;

typedef struct {                                                  // Abon=record
            Addr Adr;                                             //    Adr:Addr;
            Nume N,P,Tel;                                         //    N,P,Tel:Nume;
        } Abon;                                                   // end;

                                                                  // var
Abon List[nm+1];                                                  // List:array[1..nm]of Abon;
int n,i;                                                          // n,i:1..nm;
Nume s;                                                           // s:Nume;

void main(void)
{                                                                 // begin
clrscr();                                                         // clrscr;
printf("n=");                                                     // write('n=');
scanf("%d", &n);                                                  // readln(n);

for(i=1;i<=n;i++)                                                 // for i:=1 to n do with List[i] do
{                                                                 // begin
   printf("%d)", i);                                              //    writeln(i,')');
   printf("Numele: ");    scanf("%s", List[i].N);                 //    write('Numele: ')   ;  readln(N)         ;
   printf("Prenumele: "); scanf("%s", List[i].P);                 //    write('Prenumele: ');  readln(P)         ;
   printf("Tel: ");       scanf("%s", List[i].Tel);               //    write('Tel: ')      ;  readln(Tel)       ;
   printf("Strada: ");    scanf("%s", List[i].Adr.Strada);        //    write('Strada: ')   ;  readln(adr.strada);
   printf("Nr. casei: "); scanf("%u", List[i].Adr.Nr);            //    write('Nr. casei: ');  readln(adr.Nr)    ;
}                                                                 // end;

clrscr();                                                         // ClrScr;

printf("a) Lista abonatilor al caror tel. incepe cu \"47\":\n");  // Writeln('a) Lista abonatilor al caror tel. incepe cu "47":');
for(i=1;i<=n;i++) if(strncmp(List[i].Tel, "47", 2)==0)            // for i:=1 to n do with list[i] do if Copy(Tel,1,2)='47' then
   printf("%s %s\n", List[i].N, List[i].P);                       //    writeln(N,' ',P);
printf("\n");                                                     // writeln;

printf("b) Numele strazii? "); scanf("%s", s);                    // write('b) Numele strazii? ');readln(S);
for(i=1;i<=n;i++) if(strcmp(List[i].Adr.Strada, s)==0)            // for i:=1 to n do with list[i] do if S=Adr.Strada then
   printf("%s %s %s\n", List[i].N, List[i].P, List[i].Tel);       //    writeln(N,' ',P,' ', tel);
printf("\n");                                                     // writeln;

printf("c) Numele abonatului? "); scanf("%s", s);                 // write('c) Numele abonatului? ');readln(S);
for(i=1;i<=n;i++) if(strcmp(List[i].N, s)==0)                     // for i:=1 to n do with list[i] do if S=N then
   printf("%s %s\n", List[i].P, List[i].Tel);                     //    writeln(P,' ', tel);
printf("\n");                                                     // writeln;

getch();                                                          // readkey;
}                                                                 // end.