IT rekvalifikace s garancí práce. Seniorní programátoři vydělávají až 160 000 Kč/měsíc a rekvalifikace je prvním krokem. Zjisti, jak na to!
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.
Avatar
Pavel Strombik:6.4.2019 16:22

Chtel bych vědět jak se vytvoří vice poli které má třeba 5 prvku a napní se samo nahodnými čísly.

Zkusil jsem: Hledal jsem ale nic mi nefungovalo, chci videt hlavně kod

Chci docílit: Hraju si s pascalem a zrovna řeším tohle.

 
Odpovědět
6.4.2019 16:22
Avatar
Nahoru Odpovědět
6.4.2019 17:10
Každé rozhodnutí a každý krok v životě nás někam posune. Bohužel jen některé nás posouvají dopředu.
Avatar
Odpovídá na Michal Haňáček
BumBumRatatata:6.4.2019 17:21

v čem mam chybu
?

program random11;
var x:integer;
begin
randomize;
x:=random (20);
writeln(x);
readln();
end.

 
Nahoru Odpovědět
6.4.2019 17:21
Avatar
Odpovídá na BumBumRatatata
Pavel Strombik:6.4.2019 17:22

Něco podobného jsem našel na youtube ale taky mi to nefunguje

 
Nahoru Odpovědět
6.4.2019 17:22
Avatar
Odpovídá na Pavel Strombik
Matúš Olejník:6.4.2019 17:37

A čo konkrétne ti na tom nefunguje? Ja keď dám do Googlu "pascal array" tak hneď prvý link mám http://wiki.freepascal.org/Array z toho vyčítaš ako deklaruješ pole.
Ako sa generuje náhodné číslo mi tiež Google hneď nájde napr. tu https://www.freepascal.org/…/random.html
A toto už len spojíš dokopy a použiješ for cyklus.

program randomprogram;
var
    pole : array[0..4] of integer;
    i : integer;
begin
    randomize;
    for i := 0 to 4 do begin
        pole[i] := random(20); //generuje nahodne cislo od 0 po 19
    end;

    for i := 0 to 4 do begin
        write(pole[i], ' ');
    end;

    readln();
end.
Akceptované řešení
+20 Zkušeností
+2,50 Kč
Řešení problému
Nahoru Odpovědět
6.4.2019 17:37
/* I am not sure why this works but it fixes the problem */
Avatar
Odpovídá na BumBumRatatata
Michal Haňáček:6.4.2019 17:52

Takhle od oka ten kod vypada dobre. Pokud nejde prelozit, predpokladam ze bude problem v uses (nevim odkud je Randomize a random). Ale chlapi ... predpokladal bych ze vam kompilator vyhodi chybu, muzete ji sem vypsat?

Nahoru Odpovědět
6.4.2019 17:52
Každé rozhodnutí a každý krok v životě nás někam posune. Bohužel jen některé nás posouvají dopředu.
Avatar
Odpovídá na Pavel Strombik
Michal Haňáček:6.4.2019 17:52

Co znamena nefunguje?

Nahoru Odpovědět
6.4.2019 17:52
Každé rozhodnutí a každý krok v životě nás někam posune. Bohužel jen některé nás posouvají dopředu.
Avatar
Odpovídá na Matúš Olejník
Pavel Strombik:6.4.2019 17:55

Díky něco podobného jsem potřeboval.

Ten kod co jsem zde daval funguje ale musel jsme restartovat pc z nějakych duvodu to nefungovalo

 
Nahoru Odpovědět
6.4.2019 17:55
Avatar
Odpovídá na Pavel Strombik
Matúš Olejník:6.4.2019 17:59

co jsem zde daval funguje

takže píšeš aj z účtu jakub hh? Aký to má význam? :D

Nahoru Odpovědět
6.4.2019 17:59
/* I am not sure why this works but it fixes the problem */
Avatar
Odpovídá na Matúš Olejník
BumBumRatatata:6.4.2019 18:21

Nepišu ale spletl jsem si forum kde jsem posilal kod. Pavel Strombik je uplně někdo jiny

 
Nahoru Odpovědět
6.4.2019 18:21
Avatar
Odpovídá na BumBumRatatata
Matúš Olejník:6.4.2019 18:33

Pýtal som sa Pavla a odpovedáš ty :D :D ale však ok :D

Nahoru Odpovědět
6.4.2019 18:33
/* I am not sure why this works but it fixes the problem */
Avatar
Pavel Strombik:6.4.2019 18:42

Uz se toto vlakno zvrhlo

 
Nahoru Odpovědět
6.4.2019 18:42
Avatar
Pavel Strombik:6.4.2019 18:45

Takze vsem dekuji za pomoc

 
Nahoru Odpovědět
6.4.2019 18:45
Avatar
Odpovídá na Pavel Strombik
Matúš Olejník:6.4.2019 18:46

Čo tak označiť teda riešenie?

Nahoru Odpovědět
6.4.2019 18:46
/* I am not sure why this works but it fixes the problem */
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 14 zpráv z 14.