berekenen van de equvalentie (n!) in Pascal?

[Frenkpie]

ik ben wat simpele opdrachtjes aan het maken voor pascal.. en nu is de opdracht:
schrijf een programmen dat n! berekent. De gebruiker moet eerst de waarde van n invoeren. Het programma moet dan controleren of de ingevoerde warde groter dan of gelijk aan 0 is en indien dat niet het geval is moet een foutmelding gegenereerd worden (zonder dat n! berekent wordt)

Ik wil dit dus gaan plaatsen in een if statement.. alleen ik kan nergens in het Dictaat terug vinden hoe ik n! functie kan gebruiken in pascal.. op google en de search van GoT kon ik niet echt iets nuttigs vinden..

kan iemand me even helpen hiermee?
thnx

[Dido]

Waarom schrijf je het niet uit in een loopje

(Of je weet niet wat n! betekent?)

[ Voor 29% gewijzigd door Dido op 06-12-2005 20:22 ]

[djluc]

Is dat niet iets als:
n=10
res=1
while(n--) {
res=n*res
}

In PHP dan he maar het gaat om de aanpak.

Of ik ben weereens te laat

[ Voor 14% gewijzigd door djluc op 06-12-2005 20:22 ]

[whoami]

Je hebt hier helemaal geen if voor nodig (behalve dan om te checken of n groter is dan 0).

De n! functie (ofte: faculteit) heeft ook geen operator. Wellicht dat Pascal er wel een functie voor heeft, maar ik denk dat het eerder de bedoeling is dat je zelf een algoritme schrijft dat de faculteit berekent.

Voor het geval je niet weet wat een faculteit is:

code:

n! = n * n - 1 * n - 2 * ... 1

of

code:

n! = 1 * 2 * 3 * ... * n

Ik denk dat je hiermee er wel moet uitkomen. Iig niet echt nodig om hiervoor een topic in p&w voor aan te maken.