Van egy szövegfájlom 1 sorral, benne 5 szám space-ekkel elválasztva. Hogyan tudnám beolvasni a számokat a tömbbe?
Figyelt kérdés
2009. okt. 6. 21:37
1/5 anonim 
válasza:
válasza:Milyen a programozási nyelv amivel meg akarod csinálni?
2/5 A kérdező kommentje:
turbo pascal
2009. okt. 6. 22:25
3/5 anonim válasza:
Var
tomb:Array[1..5] of Char;
inf:Text;
i:Integer;
Begin
Assign(inf,'szoveg.txt');Reset(inf);
While not EOF(inf) do
Begin
For i:=1 to 5 do
Read(inf,tomb[i]);
End;
Close(inf);
4/5 anonim válasza:
előző vagyok: régen volt már a dolog, lehet hogy a space-eket is karakternek olvassa a pascal. ha ez így van akkor a 2. 4. szám helyére space-t fog beolvasni. Hogy ezt elkerüld, a ciklusnak 1 től 9-ig kell futnia és csak az 1,3,5,7,9 nél kell a beolvasást futtatni, ezt leht egy egyszerű if paranccsal orvosolni (a feltétel hogy páratlan szám legyen
5/5 A kérdező kommentje:
Amit írtál kód tökéletesen megy, köszönöm.
2009. okt. 6. 23:07
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
A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!