BF Summer sales
Pouze tento týden sleva až 80 % na HTML & CSS a JavaScript
80 % bodů zdarma na online výuku díky naší Letní akci!
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
Tostisto
Člen
Avatar
Odpovídá na Michal Haňáček
Tostisto: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 Tostisto
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í
+1 bodů
Ř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 Tostisto
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.
Tento výukový obsah pomáhají rozvíjet následující firmy, které dost možná hledají právě tebe!
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
Tostisto
Člen
Avatar
Odpovídá na Matúš Olejník
Tostisto: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 Tostisto
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.