Cod sursa(job #302657)

Utilizator zoltrixOLARU SABIN zoltrix Data 9 aprilie 2009 09:49:05
Problema Next Scor 10
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.22 kb
var f,g:text;
    n,d:qword;
begin
assign(f,'next.in');
assign(g,'next.out');
reset(f);
rewrite(g);
readln(f,n,d);
if n mod d=0 then writeln(g,n)
             else writeln(g,(n+d-(n mod d)));
close(f);
close(g);
end.