Delphi Bir Sayının Faktöriyelini Bulma Örneği

57 Okunma Delphi

"Delphi" Programlama dilinde "Bir Sayının Faktöriyelini Bulma Örneği" ile ilgili kod örneği aşağıdadır. 

program Faktoriyel;

{$APPTYPE CONSOLE}

function Faktoriyel(n: Integer): Integer;
begin
  if n = 1 then
    Result := 1
  else
    Result := n * Faktoriyel(n-1);
end;

var
  a, sonuc: Integer;
begin
  Write('Bir tamsayı giriniz: ');
  Readln(a);
  sonuc := Faktoriyel(a);
  WriteLn(a, ' sayısının faktöriyeli: ', sonuc);
end.
Sayı Örnek Faktöriyel Matematik Çarpım Delphi

İlginizi Çekebilir

Delphi Dizinin İlk ve Son Elemanının Aynı Olup Olmamasını Bulma Ö ...

Delphi Bir Dizi Gerçek Sayının Çarpımını Bulma Örneği

Delphi Dizideki Herhangi Bir Konuma Eleman Ekleme Örneği

Delphi Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Ö ...

Delphi 1'den 100'e Kadar Asal Sayı Toplamı Örneği