求下面题目的pascal程序

某养金鱼爱好者，决定出售他的金鱼。第一次卖出了全部金鱼的一半加2分之一条金鱼；第二次卖出剩金鱼的三分之一加三分之一条金鱼；第三次卖出剩金鱼的四分之一加四分之一条金鱼；第四次卖出剩金鱼的五分之一加五分之一条金鱼，最后还剩11条。问原来有多少条金鱼？（每次卖的金鱼都是整数条）

问题是如何理解后面的几分之一条金鱼？

第n次卖出了全部金鱼的1/n加n分之一条金鱼，每次卖的都是整数，也就是说全部金鱼的一半不是整数，需要加上0.5条金鱼才是一个整数

算法推导，另An表示n次卖出以后剩下的金鱼数

那么An-1 应该是 (An + 1/n) *n，也就是n*An + 1，这样的话就简单了，循环就搞定了

count := 11;

for n := 5 downto 1 do

begin

count := count * n + 1;

end;

第一次卖出了全部金鱼的一半加2分之一条金鱼，说明他的金鱼总数是奇数，除以二以后就有小数了