Cod sursa(job #115551)
Utilizator | Data | 16 decembrie 2007 12:57:21 | |
---|---|---|---|
Problema | Nunta | Scor | 10 |
Compilator | fpc | Status | done |
Runda | preONI 2008, Runda 2, Clasa a 9-a | Marime | 0.24 kb |
var f,g:text;
i,j,nr,n:longint;
aux:char;
a:array[1..10000] of char;
begin
assign(f,'nunta.in'); reset(f);
assign(g,'nunta.out'); rewrite(g);
readln(f,n);
if n mod 2 = 1 then writeln(g,n) else writeln(g,n+1);
close(f);
close(g);
end.