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

50 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 Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek

Delphi Bir Stringin Ortadaki Üç Karakterini Bulma Örneği

Delphi Bir Listede Birden Çok Olan Elemanları Göstermek

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

Delphi Dört İşlem Yapan Örnek