Pascal - Procedury i funkcje

Silnia – funkcja

Silnia – funkcja
Pascal - Procedury i funkcje

Program: liczący silnię z danej wartości.

Wyliczanie przy pomocy funkcji – rekurencyjnie. Po podaniu wcześniej przez użytkownika liczby.

Kompilator: Turbo Pascal

Galeria:

Program w akcji.

Kod programu:

program silniazfunkcja;
uses crt;
var
   n:byte;

function silnia(n:longint):longint;

begin
         if n=0 then
            silnia:=1
         else
             silnia:=silnia(n-1)*n;
end;
begin
     clrscr;
     writeln('Podaj liczbe: ');
     readln(n);
     writeln(n,'!=',silnia(n));
     readkey;
end.

Słowniczek pojęć:

Liczby naturalnej n (w notacji matematycznej: n!, co czytamy „n silnia”) nazywamy iloczyn wszystkich liczb naturalnych nie większych niż n.
Silnia Wikipedia