Question

Помогите срочно пожалуйста

Answer 1

Var
  k, n: integer;

begin
  readln(k, n);
  writeln(n div k + 1, ' ', n mod k);
end.