Készítsünk faktoriálist számító programot, amely kiszámolja és kiírja a képernyőre 1-10 faktoriálist. Pl. : 3! =3*2*1=6 Valaki segíteni ebben?

fact(n)

{

switch(n)

case 1:

print(1)

case 2:

print(2)

case 3:

print(6)

case 4:

print(24)

case 5:

print(120)

...

}

Delphi-ben segítek, talán megérted:

program Project2;

{$APPTYPE CONSOLE}

uses SysUtils;

var n : Integer;

function Fakt (a: Int64): Int64;

var i : Integer ;

begin

Result := 1 ;

for i := 1 to a do Result := Result * i ;

end;

begin

for n := 1 to 10 do WriteLn(Fakt(n));

ReadLn;

end.

using System;

public class Program

{

public static void Main()

{

int num = 4;

int fakt = num;

for(int i = num-1; i > 1; i--) {

fakt *= i;

}

Console.WriteLine(fakt);

}

}