- Ismét egy "Idióta" A.I. Projekt, hogy meglovagolja az aktuális trendeket...
- Időutazás floppyval: A 486-os visszavág PCem-men
- AMD Ryzen 9 9900X (100-100000662WOF)+ Samsung 990 PRO 2TB MZ-V9P2T0BW
- Processzor és videokártya szilícium mag fotók újratöltve!
- Az e-sport napistenének ajándéka: Lamzu Inca gamer egér
- gban: Ingyen kellene, de tegnapra
- Luck Dragon: Asszociációs játék. :)
- No Voice in the Galaxy
- Rap, Hip-hop 90'
- GoodSpeed: AMD Ryzen 9 9900X (100-100000662WOF)+ Samsung 990 PRO 2TB MZ-V9P2T0BW
- Magga: PLEX: multimédia az egész lakásban
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Fűzzük össze a szavakat :)
- sziku69: Szólánc.
- eBay-es kütyük kis pénzért
Hirdetés
-
LOGOUT
Új hozzászólás Aktív témák
-
VladimirR
nagyúr
pontosan mit is szeretnel? elobb feltolteni a tombot, s aztan kiirni?
mert pl a programban miutan feltoltod a rekordot egybol kiirod
egyebkent tomb-ot igy csinalsz:
var tkonyv: array[1..10] of konyv;
konyv tipusu file-t meg igy:
var f: file of konyv;
bar neked, ha tombot kell file-ba irnod, inkabb ez kellene
type t_konyv=array[1..10] of konyv;
var t: t_konyv;
f: file of t_konyv;
es ezutan egy cikluson belul feltoltened a tombot, majd az egeszet egyben irnad ki a file-ba, a ciklus utan
for i:=1 to 10 do
begin
writeln(''Kerem a konyv cimet:'');
readln(t[i].cim);
writeln(''Kerem a konyv szerzojet'');
readln(t[i].szerzo);
writeln(''Kerem a kiadasi evet'');
readln(t[i].kiev);
end;
write(f, t);
asszem igy mukodnie kellene
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- Raspberry Pi
- OLED TV topic
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Éjszakai műszak
- Elemlámpa, zseblámpa
- Jogász topic
- Nincs kill switch az NVIDIA chipekben
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Apple MacBook
- Hat év támogatást csomagolt fém házba a OnePlus Nord 4
- További aktív témák...
- Telefon felvásárlás!! Xiaomi Redmi Note 10, Xiaomi Redmi Note 10s, Xiaomi Redmi Note 10 Pro
- ROBUX ÁRON ALUL - VÁSÁROLJ ROBLOX ROBUXOT MÉG MA, ELKÉPESZTŐ KEDVEZMÉNNYEL (Bármilyen platformra)
- Bomba ár! Lenovo ThinkPad L13 G3 - i5-1245U I 16GB I 256SSD I 13,3" FHD Touch I NBD Gari!
- 122 - Lenovo Legion Pro 5 (16ARX8) - AMD Ryzen 7 7745HX, RTX 4070 - 4 év garancia
- Telefon felvásárlás!! iPhone 13 Mini/iPhone 13/iPhone 13 Pro/iPhone 13 Pro Max
Állásajánlatok
Cég: FOTC
Város: Budapest