The Anonymous... |
|
| digli che hai avuto un buon maestro hahahhaha cmq eccoti il programma che fa il fattoriale come richiesto in tagboard CODICE program fattoriale;
uses crt;
var i,n,fatt:integer;
begin
clrscr;
writeln('inserisci il numero intero >=0');
readln(n);
fatt:=1;
for i:= 1 to n do
begin
fatt:=fatt*i
end;
if n<0 then
writeln('cattivo! hai immesso un numero negativo')
else
writeln('il fattoriale del numero immesso e'': ',fatt);
readln;
end. |
| | |
