Alexandra Gomez Sejas

Program AGENDA; Uses crt; Var a,b,d: String c,d : Integer Begin Clrscr; Write(´Nombre´);readln(a); Write(´Apellido´);readln(b); Write(´Cumpleaños´);readln(c); Write(´Direccion´);readln(d); Write(´Telefono´);readln(e); End