Kezdőoldal » Számítástechnika » Programozás » Hogyan csináljam meg Free...

Hogyan csináljam meg Free Pascalban a változók sorsolását?

Figyelt kérdés
A változók string típusúak.

2013. ápr. 14. 16:14
 1/5 anonim ***** válasza:
Változók sorsolását? Milyen változókét?
2013. ápr. 14. 17:07
Hasznos számodra ez a válasz?
 2/5 A kérdező kommentje:

amit a var paranccsal lehet megadni,pl.:

var a:string;

2013. ápr. 14. 17:15
 3/5 anonim ***** válasza:
Jó de mit akarsz sorsolni ezt nem értjük.
2013. ápr. 14. 17:22
Hasznos számodra ez a válasz?
 4/5 ejbenjaro ***** válasza:
Sehogy. Változót nem fogsz tudni kisorsolni. Maximum a változó értékét tudod véletlenszerűen előállítani, esetleg egy tömb elemeit tudod még sorsolással kiválasztani stb.
2013. ápr. 14. 18:59
Hasznos számodra ez a válasz?
 5/5 anonim ***** válasza:

Ha a változók string tipusúak, akkor használj egy tömböt.


program sorsol;

uses crt;

var s: array[1..255] of string;

sorszam:integer

procedure feltolt;

var sorszam:integer;

Begin

for i:=1 to 255 do begin

Writeln('kérem a szöveget');

readln(s[i]);

end;

end.

Begin

feltolt;

Randomize;

sorszam:=random(255)+1;

Writeln('A sorsolt szöveg: ',tomb[sorszam]);

end.


Hát ennyi lenne a feladat. Azonos tipusú adatokat így lehet sorsolni. Persze a feltolt eljárásban érdemes a for ciklus helyett másképpen csinálni( mivel 255 string tipusú változót kell megadni). De most ehhez volt kedvem:))

2013. ápr. 15. 13:15
Hasznos számodra ez a válasz?

Kapcsolódó kérdések:




Minden jog fenntartva © 2025, 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!