.jpg)
Function Faktorial(A: Integer): LongInt;
Var B: Integer;
begin
Result:=1;
if A=0 then Exit;
for B:=1 to n do
Result:=Result*B;
end;
Recent Posts
Selamat datang di Coding Delphi Land Weblog kumpulan source code pemogram delphi
(Bukan maksud untuk menggurui tetapi marilah kita berbagi ilmu tuk perkembangan kemajuan teknologi kita
Tampilkan postingan dengan label Math Delphi. Tampilkan semua postingan
Tampilkan postingan dengan label Math Delphi. Tampilkan semua postingan
