Pascal nahodne cisla generovanie procedurou – Pascal – Fórum – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Pascal nahodne cisla generovanie procedurou – Pascal – Fórum – Programujte.comPascal nahodne cisla generovanie procedurou – Pascal – Fórum – Programujte.com

 

pietro620
Návštěvník
11. 3. 2013   #1
-
0
-

Prosim Vas pomozte robil som program v Pascale a nemozem najst chybu.

Upravte nasledujúci program, aby sčítal 20 náhodných čísel generovaných procedúrou randomize (rozsah zvoľte ľubovoľne).

sucet:=0 ;

for i := 1 to 20 do

sucet:= sucet + i; 

writeln('Sucet cisel od 1 do 20 je: ',sucet);

readln

end. 
Nahlásit jako SPAM
IP: 194.160.237.–
zlz
~ Anonymní uživatel
634 příspěvků
11. 3. 2013   #2
-
0
-

Podívej se na dokumentaci k funkcím randomize a randoma použij je k vygenerování náhodných čísel. K sucet pak přičítej to vygenerované číslo, ne to i.

Nahlásit jako SPAM
IP: 78.156.159.–
pietro620
Návštěvník
12. 3. 2013   #3
-
0
-

#2 zlz
Urobil som toto: 

var : i,n,sucet: Integer;

begin
Randomize; //zapnutie generatora nahodnych cisiel
sucet:=0 ;
for i := 1 to 20 do
begin
n := Random(100)+1; //generuje nahodne cislo od 0 do 99 a precita 1, aby cisla boli od 1 do 100
sucet:= sucet + n;
end;
writeln('Sucet 20 nahodnych cisel od 1 do 100 je: ',sucet);
readln
end. 
Nahlásit jako SPAM
IP: 194.160.236.–
Zjistit počet nových příspěvků

Přidej příspěvek

Toto téma je starší jak čtvrt roku – přidej svůj příspěvek jen tehdy, máš-li k tématu opravdu co říct!

Ano, opravdu chci reagovat → zobrazí formulář pro přidání příspěvku

×Vložení zdrojáku

×Vložení obrázku

Vložit URL obrázku Vybrat obrázek na disku
Vlož URL adresu obrázku:
Klikni a vyber obrázek z počítače:

×Vložení videa

Aktuálně jsou podporována videa ze serverů YouTube, Vimeo a Dailymotion.
×
 
Podporujeme Gravatara.
Zadej URL adresu Avatara (40 x 40 px) nebo emailovou adresu pro použití Gravatara.
Email nikam neukládáme, po získání Gravatara je zahozen.
-
Pravidla pro psaní příspěvků, používej diakritiku. ENTER pro nový odstavec, SHIFT + ENTER pro nový řádek.
Sledovat nové příspěvky (pouze pro přihlášené)
Sleduj vlákno a v případě přidání nového příspěvku o tom budeš vědět mezi prvními.
Reaguješ na příspěvek:

Uživatelé prohlížející si toto vlákno

Uživatelé on-line: 0 registrovaných, 2 hosté

Podobná vlákna

Pascal nahodne cisla — založil pietro62

Nahodne cisla — založil Trebor

Náhodné čísla. — založil Kéfas

Náhodné čísla — založil Grungy

Moderátoři diskuze

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032024 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý