Desi nu mai programez in Pascal de 5 ani iti trimit o sursa deoarece programul este extrem de usor. Succes! PROGRAM n_factorial; var i,p,n:integer; begin write('n=');readln(n); p:=1; for i:=1 to n do p:=p*i; write('n factorial=',p); end.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile disponibile v-au fost utile și inspiraționale. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, suntem aici pentru a vă ajuta. Ne face plăcere să vă revedem și vă invităm să adăugați site-ul nostru la favorite pentru acces rapid!
