Programy v Pascale

Programovacie jazyky, rady, poradňa...
ChesterZZ
Amateur
Amateur
Používateľov profilový obrázok
Príspevky: 12
Registrovaný: 06 sep 2007, 10:53
Bydlisko: Bratislava
Kontaktovať používateľa:

Príspevok od používateľa ChesterZZ »

Tak ja neviem čo s tým je, ale keď to spustím a zadám číslo, tak mi faktoriál nevypočíta proste.

Kód: Vybrať všetko

program faktorial; 
var n:integer; 
     fakt:longint; 
begin 
readln(n); 

fakt:=n; 

repeat 
     n:=n-1; 
     fakt:=fakt*n; 
until(n=1);
readln; 
end.
Takto to máš aj ty?
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Príspevok od používateľa audiotrack »

áno, tak to mám. A som si istý že ti ho vypíčta. Druhá vec je, že si ho nikde nevypíšeš, ale výsledok bude v premennej fakt určite správny. Tak nepíš že to nefunguje :)
piton
King
King
Používateľov profilový obrázok
Príspevky: 1902
Registrovaný: 02 aug 2005, 0:31
Bydlisko: Hnojisko

Príspevok od používateľa piton »

ChesterZZ napísal:Tak ja neviem čo s tým je, ale keď to spustím a zadám číslo, tak mi faktoriál nevypočíta proste.

Kód: Vybrať všetko

program faktorial; 
var n:integer; 
     fakt:longint; 
begin 
readln(n); 

fakt:=n; 

repeat 
     n:=n-1; 
     fakt:=fakt*n; 
until(n=1);
readln; 
end.
Takto to máš aj ty?
Prva vec: Vies co je faktorial?
Druha: Ten program nevypocita faktoroial velkeho cisla, lebo sa do longintu "nezmesti"...
ChesterZZ
Amateur
Amateur
Používateľov profilový obrázok
Príspevky: 12
Registrovaný: 06 sep 2007, 10:53
Bydlisko: Bratislava
Kontaktovať používateľa:

Príspevok od používateľa ChesterZZ »

Takže aj keď mi nevypíše výsledok, je to správne ? A čo s tým potom, aby mi vypísalo aj výsledok ? :D

Piton sprostý nie som, ale program, ktorý mi nevypíše výsledok mi je nanič. A nemyslím si, že napr. 2! je až také veľké číslo :D
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Príspevok od používateľa audiotrack »

ChesterZZ napísal:Takže aj keď mi nevypíše výsledok, je to správne ? A čó s tým potom, aby mi vypísalo aj výsledok ? :D
žeby writeln(fakt) pred posledné readln? :roll:
ChesterZZ napísal:Piton sprostý nie som, ale program, ktorý mi nevypíše výsledok mi je nanič. A nemyslím si, že napr. 2! je až také veľké číslo :D
ehm, no radšej budem ticho
piton
King
King
Používateľov profilový obrázok
Príspevky: 1902
Registrovaný: 02 aug 2005, 0:31
Bydlisko: Hnojisko

Príspevok od používateľa piton »

ChesterZZ napísal:Takže aj keď mi nevypíše výsledok, je to správne ? A čó s tým potom, aby mi vypísalo aj výsledok ? :D

Piton sprostý nie som, ale program, ktorý mi nevypíše výsledok mi je nanič. A nemyslím si, že napr. 2! je až také veľké číslo :D
omg! to nevies pouzit ani writeln?
EDIT: audiotrack: :D
ChesterZZ
Amateur
Amateur
Používateľov profilový obrázok
Príspevky: 12
Registrovaný: 06 sep 2007, 10:53
Bydlisko: Bratislava
Kontaktovať používateľa:

Príspevok od používateľa ChesterZZ »

No už som na to prišiel aj sám. Ale díky, že zo mňa robíte debila.

No nič, pomôžete mi ešte s tými zvyšnými dvoma ?
Napísať odpoveď