FINÁLNÍ VÝPRODEJ KREDITŮ na ITnetwork je tady. Využij poslední šanci a získej až 80 % extra kreditů ZDARMA na náš interaktivní e-learning. Zjisti více:
NOVINKA: Kurz kybernetické bezpečnosti s akreditací MŠMT, nyní již od 0 Kč. Staň se žádaným profesionálem. Zjisti více:
Avatar
Pavel Strombik
Člen
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
Michal Haňáček
Tvůrce
Avatar
Odpovídá na Pavel Strombik
Michal Haňáček:6.4.2019 17:10

"Mno ... ":https://www.itnetwork.cz/…ca6247bd0bee

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
BumBumRatatata
Člen
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
Pavel Strombik
Člen
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
Matúš Olejník
Člen
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
Michal Haňáček
Tvůrce
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
Michal Haňáček
Tvůrce
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
Pavel Strombik
Člen
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
Matúš Olejník
Člen
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
BumBumRatatata
Člen
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
Matúš Olejník
Člen
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
Člen
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
Člen
Avatar
Pavel Strombik:6.4.2019 18:45

Takze vsem dekuji za pomoc

 
Nahoru Odpovědět
6.4.2019 18:45
Avatar
Matúš Olejník
Člen
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.