Cod sursa(job #68574)

Utilizator CezarMocanCezar Mocan CezarMocan Data 28 iunie 2007 14:53:17
Problema Sarpe Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.07 kb
Raporteaza aceasta sursa 
var n:qword;
begin
readln(n);
writeln(4*n+2*(n-1)*(n-2));
end.