[Pascal] kod źródłowy do losowego wybierania

0

mam pytanie: jak zrobić tak, żeby program wybieral losowe nazwy wcześniej określone w programie. jeżeli ktoś mnie nie rozumie to moge inaczej:

program c;

coś coś coś;

begin

bla,bla,bla;

nazwa1, nazwa2, nazwa3;

coś co robi żeby losowało i wyświetliło;

end.

z góry dzieki za pomoc żółtodziobowi :-/

0

mam pytanie: jak zrobić tak, żeby program wybieral losowe nazwy wcześniej określone w programie. jeżeli ktoś mnie nie rozumie to moge inaczej:

program c;

coś coś coś;

begin

bla,bla,bla;

nazwa1, nazwa2, nazwa3;

coś co robi żeby losowało i wyświetliło;

end.

z góry dzieki za pomoc żółtodziobowi :-/

Nie wiem czy się nie mylę ;)

program v;

var
I: integer;
nazwy: Array[0..3] of String;
begin
nazwy[0]:='A';
nazwy[1]:='B';
nazwy[2]:='C';
nazwy[3]:='D';
I:=random(4)-1;
WriteLn("Wylosowano: ")+nazwy[I];
end.

może być gdzieś błąd ;) od jakiegoś czasu siedzę w Delphi ...

0

Witaj

Na skrzynkę wysłałem Ci przykładowy programik ściągniety z jakiejś strony który losóje liczbe od 1-6 coś niby totek myślę że może Ci się przydać.


    Tomash
0

I jak przydał się??

1 użytkowników online, w tym zalogowanych: 0, gości: 1