不是VIP会员，不能显示答案

题目解答

题目：
var
a, b, c, x, y : longint;
begin
readln(a, b, c);
x := a div c;
y := b mod c;
if x < y then
begin
x := x - y; y := x + y; x := y - x;
end;
writeln(x, ' ', y);
end.
输入：25 38 13
输出：12 1
考点：
分析：
解答：
评论：
老师：