Cod sursa(job #168283)
Utilizator | Postelnicu Dan Marian kolapsys | Data | 30 martie 2008 23:08:28 |
---|---|---|---|
Problema | Next | Scor | 10 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.4 kb |
{ http://infoarena.ro/problema/next }
var f,g:text;
n,m,d:int64;
BEGIN
assign(f,'next.in'); reset(f);
assign(g,'next.out'); rewrite(g);
readln(f,n);
readln(f,d);
if n mod d = 0 then write(g,n)
else begin
m:=(n div d +1)*d;
write(g,m);
end;
close(f); close(g);
END.