Cod sursa(job #41049)
| Utilizator |  Mihai Botezatu Catalin bota |
Data | 27 martie 2007 22:05:56 |
|---|---|---|---|
| Problema | Next | Scor | 10 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.2 kb |
var n,d,m,c:qword;
k,l:text;
begin
assign(k,'next.in');
reset(k);
assign(l,'next.out');
rewrite(l);
read(k,n);
read(k,d);
c:=n div d;
c:=c+1;
m:=d*c;
write(l,m);
close(k);
close(l);
end.
