Mètoode de calcul n !
Résolu
pseudo anonyme
-
le père -
le père -
program calcul;
uses wincrt;
var i,n,f:integer;
begin
writeln('entre ie valeur de n:');
readln(n);
f:=1;
for i:=1 to n do
f:=f*i;
write('res', f);
end.
uses wincrt;
var i,n,f:integer;
begin
writeln('entre ie valeur de n:');
readln(n);
f:=1;
for i:=1 to n do
f:=f*i;
write('res', f);
end.
Configuration: Windows XP
