Cod sursa(job #903729)
| Utilizator |  Fusy Wool wolly |
Data | 2 martie 2013 18:00:48 |
|---|---|---|---|
| Problema | Factorial | Scor | 10 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.27 kb |
var
input,output:text;
n:int64;
begin
assign(input, 'fact.in'); reset(input);
assign(output, 'fact.out'); rewrite(output);
read(input,n);
close(input);
{if n>0 then writeln(output,4*n+5) else writeln(output,'1');}
writeln(output,'-1');
close(output);
end.
