Question

使用PASCAL语言

某动物饲养中心用X元专款购买小狗(每只A元)和小猫(每只B元)两种小动物。
要求专款专用,(至少猫狗各一),正好用完?请求出方案的总数。如没有请输出0.
Input

输入一行，只有三个整数.分别为X,A,B.

Output

输出只有一行（这意味着末尾有一个回车符号），包括1个整数。

Sample Input

1700 31 21

Sample Output

3

Hint

请大家注意了，务必要用一重循序，不然会超时！！！！

Source

无

Answer 1

Var x,a,b,k,i:integer;
begin
Read(x,a,b);
k:=0;
For i:=1 to x div a do
if (x -i*a)mod b=0 then if x-i*a>=b then inc(k );
Writeln(k );
end.