Hirdetés
- Google Pixel topik
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- A Gemini húzza ki a Sirit a csávából
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Xiaomi 13T és 13T Pro - nincs tétlenkedés
- Milyen okostelefont vegyek?
- Telekom mobilszolgáltatások
- Yettel topik
- Akciófigyelő: Egész hónapos Black Friday a mi.com-on
- iPhone topik
Új hozzászólás Aktív témák
-
Lortech
addikt
válasz
Wizardmon
#1419
üzenetére
A type kulcsszó saját változó típus létrehozására használható. A pascal beépített változó típusai pl integer, byte, real, array. Ezek felhasználásával lehet újakat alkotni. /Illetve csak bizonyos típusokat lehet felhasználni _valóban ''új''_ típus alkotásához. Egyébként csak átnevezés/
Ez tipikusan olyan fogalom, amit példán keresztül lehet megérteni annak, aki még nem találkozott ilyennel.
Tehát egy példa:
a:
type
tomb: array[1..10] of byte;
var
t: tomb;
ez egyenlő az alábbival:
b:
t: array[1..10] of byte;
Az ''a'' esetben saját típust hozol létre a type kulcsszó után, tomb lett az új típusod neve, és ez a típus egy 10 elemű byte-array. Ezután a VAR kulcsszóval bevezetett változó deklarációs részben már úgy hivatkozhatsz az általad létrehozott típusra, mintha az a pascal egy beépített típusa lenne, tehát egy változónévhez hozzárendelheted. A b változatban ugyanazt leírtam, csak type nélkül, a kettő végeredményben megegyezik. Pascalban és a hozzá hasonló procedurális nyelvekben még nem annyira hangsúlyos a saját típusok létrehozása, és a lehetőségek is eléggé korlátozottak, inkább az átláthatóság és szemléletesség miatt van létjogosultsága mint funkcionalitásban. Egyelőre szerintem elég ennyi, ha valóban szükséged lesz a használatára, akkor már tudni fogod vsz.
[Szerkesztve] -
VladimirR
nagyúr
válasz
Wizardmon
#1419
üzenetére
ezzel definialsz uj adattipust, a mar meglevokbol
mint irtad, lehet felsorolt, tomb, rekord, de lehet barmilyen adattipus
tegyuk fel, hogy neked olyan adattipusra van szukseged, amiben egyutt tudod tarolni valakinek az adatait, mint pl nev, cim, szuletesi datum, suly, magassag
ehhez a legjobb, ha csinalsz egy rekord-ot es minden szemely adatait egy kulon rekordban tarolod
type adatlap=record
nev : string[80];
cim : string[80];
szul_dat : string[8];
szuly : real;
magassag : byte;
end;
ezzel csak az adattipust hoztad letre, a valtozot meg nem, azt itt is meg kell tenni, pl.:
var user1, user2 : adatlap;
vagy lehet az adatlapokat tomb-ben tarolni:
var users : array[1..100] of adatlap;
elobbi esetben egyszeruen user1.nev, user2.cim formaval hivatkozol a rekord elemeire, utobbiban pedig users[1].nev, users[2].cim formaban
de ettol egyszerubb pelda, hogy a fentebb hasznalt 80 karakter hosszu szoveg tarolasara alkalmas tipust hozunk letre:
type s80 = string[80];
amit aztan igy tudsz hasznalni:
var s : s80;
Új hozzászólás Aktív témák
- Milyen széket vegyek?
- Futás, futópályák
- sziku69: Fűzzük össze a szavakat :)
- Nitrogénfelhőben született az új rekord
- Google Pixel topik
- Temu
- Miért nem tűnik el soha a kalózkodás?
- Építő/felújító topik
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Pánikban a világ a Radeon RX 5000 és 6000 sorozat támogatása miatt
- További aktív témák...
- Xbox 360 Slim 500GB Rgh 3.0 azonnali bootolás! + játékok, 1 év gar. 24 éve működő üzletből!
- XBOX Series S/X/One/S/X/360 konzolok teljes karbantartása, pasztázással Thermal Grizzly 1 órán belül
- XBOX One/S/X/360 Series S/X konzolok teljes karbantartása, pasztázással Thermal Grizzly 1 órán belül
- Xbox Series X, kitisztítva+újrapasztázva, 6 hó teljeskörű gar., Bp-i üzletből eladó!
- Nintendo Switch RP2040-tiny Picofly 2.80fw CFW chip (Lite/V1/V2/OLED) készlet 1 év garanciával eladó
- Bomba ár! Lenovo ThinkPad X390: i5-G8 I 8GB I 256SSD I 13,3" FHD I HDMI I Cam I W11 I Gari!
- BESZÁMÍTÁS! MSI Z390-A Pro Z390 chipset alaplap garanciával hibátlan működéssel
- Telefon felvásárlás!! iPhone 15/iPhone 15 Plus/iPhone 15 Pro/iPhone 15 Pro Max
- GYÖNYÖRŰ iPhone 14 Pro Max 256GB Space Black - 1 ÉV GARANCIA, Kártyafüggetlen,MS3489, 100% Akksi
- ASUS TUF A15 FA507 - 15.6"FHD 144Hz - Ryzen 7 7435HS - 16GB - 1TB - Win - RTX 4050 - 2,5 év garancia
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Laptopműhely Bt.
Város: Budapest


