Hogyan lehet pascalban egy record típusba meg egy recordot berakni?
Tehát az a feladat hogy be kell olvasni személyek adatait. En úgy csináltam h:
type szemely=record
vezeteknev:string;
keresztnev:string;
cim:string;
telefonszam:longint;
szuletesi datum:record
ev:longint;
honap:integer;
nap:integer;
end;
nevnapi datum:record
honap:integer;
nap:integer;
end;
end;
De ez így nem jó, mert amikor beolvasom a vezeteknevet akkor azt írja hogy nem található. Mi a baj? Legysziii segítsetek.
type a=record
...
end;
type b=record
valami:a;
end;
A gond itt van:
nevnapi datum: record
...
end;
A baj az, hogy nevnapi datum nem lehet egy változónak a neve. Nevezd át nevnapi_datum-nak.
"amikor beolvasom a vezeteknevet akkor azt írja hogy nem található"
Akkor lehet, hogy az olvasásnál van a gond.
A második end után hozz létre egy
var Andras: szemely;-t
...
A vezeteknev mezőre úgy kell hivatkozni, hogy:
Andras.vezeteknev;
de ugy folytattam hogy:
nyilvantartas=array[1..3-] of szemely;
var ny:nyilvantartas;
sz:szemely;
n,i,:integer;
begin
for i:-1 to n do
with ny[i] do
readln(vezeteknev);
....
s akk ennel a vezeteknevnel van a baj
var ny:nyilvantartas;
sz:szemely;
n,i,:integer;
begin
for i:-1 to n do
with ny[i] do
readln(vezeteknev);
HÁt mert vezeteknev változód nincs. :)
Neked az sz (szemely) rekord vezeteknev változója kell, amit úgy érsz el, hogy: sz.vezeteknev :)
Azt írtad:
...
de ugy folytattam hogy:
nyilvantartas=array[1..3-] of szemely;
var ny:nyilvantartas;
sz:szemely;
n,i,:integer;
begin
for i:-1 to n do
with ny[i] do
readln(vezeteknev);
....
Így javítsd ki:
type nyilvantartas=array[1..100] of szemely;
var ny:nyilvantartas;
sz:szemely;
n,i,:integer;
begin
write('n: ');
readln(n);
for i:-1 to n do
with ny[i] do
readln(vezeteknev);
Bocs.
for i:1 to n do
with ny[i] do
readln(vezeteknev);
Kapcsolódó kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!