Hirdetés
- Milyen okostelefont vegyek?
- Poco X3 Pro - hardverfrissítés
- Várhatóan ez a négy iPhone már nem telepítheti az iOS 27-et
- Fotók, videók mobillal
- Íme az új Android Auto!
- OnePlus 15 - van plusz energia
- Samsung Galaxy A57 - kecses test, lusta lélek
- iPhone topik
- Apple iPhone 17 Pro Max – fennsík
- Redmi Note 12 Pro - nem tolták túl
- Graphics: Telefonvásárlási kálváriám....avagy clickbait cím: Horror a hardveraprón
- Luck Dragon: Asszociációs játék. :)
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- Lalikiraly: Mercis kalandok - Huszonnyolcadik rész - Az újrakezdés
- sziku69: Fűzzük össze a szavakat :)
-
Mobilarena

Új hozzászólás Aktív témák
-
R0GERIUS
tag
válasz
Gyuri16
#5795
üzenetére
Köszönöm a válaszokat!
Ez volt nekem is az első gondolatom, de nem jött össze...
Be is illesztem ide ezt az alprogramot, mert lehet, hogy én írtam rosszul be, csak nem veszem észre.procedure F1;
begin
assign (be,'pitypang.txt');
reset(be);
n:=0;
readln(be,n);
for i:=2 to n do
readln(be,t[i].foglalas,t[i].szoba,t[i].erkezes,t[i].tavozas,t[i].lakok,t[i].reggeli,t[i].azonosito);
close(be);
writeln('Sikeres!')
end;Konkrétan itt hova kellene beszúrni az első sor "readln"-jét?

-
R0GERIUS
tag
Hellósztok!
Érettségire Pascalból gyakorolok, de elakadtam egy kicsit.
A 2011. október 23-ai emelt érettségiben úgy kellene beolvasni, hogy az állomány második sorától olvasson (mert az első sor az adatok számát és nem adatot tartalmaz).
Erre valaki tud valami okosságot? (Én már próbáltam keresni de nem találtam.)
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- HP 250 G7,15.6",i5-1035G1,8GB DDR4,256GB SSD,WIN11
- Lenovo ThinkPad T480s,FHD,14",i5-7300U,8GB DDR4,256GB SSD,WIN11,TOUCH,jó akku
- Lenovo ThinkPad T480s,FHD,14,i5-7300U,8GB DDR4,256GB SSD,WIN11,TOUCH
- Ugreen Revodok Max Thunderbolt 4, dokkoló, port többszöröző állomás
- Audio technica ath adx5000 hifi fejhallgató extra kábelekkel
- Bontatlan Apple Pencil MU8F2ZM/A 2. generáció / 12 hónap jótállás
- GYÖNYÖRŰ iPhone 13 mini 128GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3293
- Apple iPhone 13 Pro Max / 128GB / Kártyafüggetlen / 12Hó Garancia / Akku:86%
- Apple iPhone 16e 128 GB White 100% Akkumulátor 12 hónap Garancia Beszámítás Házhozszállítás
- Eredeti Lenovo 135W töltők (sárga téglalap)
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest



