Cod sursa(job #203156)

Utilizator irene_mFMI Irina Iancu irene_m Data 14 august 2008 11:37:49
Problema Factorial Scor 5
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.17 kb
program cifre;
var n,p:longint;
    f,g:text;
begin
assign(f,'fact.in'); reset(f);
assign(g,'fact.out'); rewrite(g);
read(f,p);
close(f);
write(g,5*p);
close(g);
end.