Cod sursa(job #278679)
Utilizator | Data | 12 martie 2009 14:15:43 | |
---|---|---|---|
Problema | Factorial | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.1 kb |
program fact;
var g:text;
begin
assign(g,'fact.out');
rewrite(g);
write(g,-1);
close(g);
end;