Acasa | Trimite referat | Cere referat | Contact

Referat LIMBAJUL DE PROGRAMARE PASCAL - Scrierea unui program care permite crearea unei baze de date folosind o lista liniara

LIMBAJUL DE PROGRAMARE PASCAL - Scrierea unui program care permite crearea unei baze de date folosind o lista liniara

Categorie: Referate Informatica

Referat downloadat de: 212 ori.

Cauta referat dupa: limbajul programare pascal scrierea unui program care permite crearea unei baze date folosind lista liniara

Descriere referat:

LIMBAJUL DE PROGRAMARE PASCAL � Scrierea unui program care permite crearea unei baze de date folosind o list? liniar?. program baza_de_date; TYPE ElemPointer = ^Elem; Elem = record nume : string[20]; adresa : string[30]; tel : integer; leg : ElemPointer end; VAR h : ElemPointer; PROCEDURE creare_lista; VAR p: ElemPointer; ch : char; BEGIN h:=nil; repeat write ('Introduce?i valori (D/N) ? : '); readln (ch); if ch = 'N' then exit; if ch = 'D' then begin if h = nil then begin new(h); p:=h end else begin new(p^.leg); p:=p^.leg end; with p^ do begin write ('Numele : '); readln(nume); write ('Adresa : '); readln(adresa); write ('Telefon : '); readln(tel); writeln end; p^.leg:=nil end until false END; PROCEDURE citire_lista; VAR p:ElemPointer; BEGIN p:=h; while p<>nil do begin with p^ do begin writeln('Numele : ',nume); writeln('Adresa : ',adresa); writeln('Telefon: ',tel); end; writeln; p:=p^.leg end END; PROCEDURE salvare(p:ElemPointer); Var f: text; BEGIN assign(f, 'date.dat'); rewrite(f); repeat with p^ do begin writeln(f,nume); writeln(f,adresa); writeln(f,tel); writeln(f); end; p:=p^.leg until p=nil; writeln(f,'!'); close(f); writeln('OK') END; BEGIN

Alte referate din materia: Informatica

Nr.	Nume referat	Hits
1	mtSZPKbW	20
2	TkkvMlabSupl	50
3	qzpymq@dxuzju.com	147
4	email@gmail.com	269
5	pfuqxd@exjswl.com	287
6	ncqcez@hdtnnq.com	244
7	Hard	722
8	ISTORIA INTERNET-ULUI	782
9	Impera	469
10	Info Doc	524
11	Info-TIRON	467
12	Informatica - Grafica pentru web	938
13	Informatica - Introducere in HTML	711
14	Initiere in pc	701
15	Instalarea sistemului de operare Windows	593
16	Internetul ca sursa de comunicare	580
17	Istoria Internetului	617
18	Istoria calculatorului	539
19	Istoria metodelor de proiectare	359
20	Java visavis de C++	401
21	Java vizavi de C	333
22	LIMBAJUL DE PROGRAMARE PASCAL - Programul defineste tipul salariat, o inregistrare cu variante, valorile citite fiind salvate in fisierul salariat.dat	0
23	Limbajul C	413
24	Lista vinuri prg	322
25	Lotus software	293

Acasa Trimite referat Cere referat Adauga la favorite Seteaza ca homepage Contact libertateailuziei Trailere Filme Filme Noi Jocuri Online Jocuri Barbie Jocuri pentru Copii GameBox.ro Make Money Bucuresti regim hotelier