修改——买铅笔

【原来的炸了，再写一个（想看原来的就看最后一页吧）】
SSL 2591
洛谷P1909 买铅笔
题目描述
P老师需要去商店买n支铅笔作为小朋友们参加NOIP的礼物。她发现商店一共有3种包装的铅笔，不同包装内的铅笔数量有可能不同，价格也有可能不同。为了公平起见，P老师决定只买同一种包装的铅笔。商店不允许将铅笔的包装拆开，因此P老师可能需要购买超过n支铅笔才够给小朋友们发礼物。现在P老师想知道，在商店每种包装的数量都足够的情况下，要买够至少n支铅笔最少需要花费多少钱。

var   n,i,money,num,min,s:longint;begin  readln(n);  for i:=1 to 3 do   begin     readln(num,money);     if n mod num=0 then      s:=(n div num)*money     else      s:=(n div num+1)*money;     if (s<min)or(i=1) then min:=s;   end;  writeln(min);end.

在程序中，money即每袋铅笔的价格，num是有每袋多少铅笔。
于是得出这样一个模型：n（所需铅笔数）除以num
但显然能看出，这个对于n不是num的倍数的情况不管用，所以加入非倍数情况：
num对n求余，若余数为零则正常执行，若余数不为零则需要多买一袋。
最后，将购买每袋铅笔以使铅笔数量达到n的钱数记起来，判断，若这钱数比之前的少，则放入，最后输出最小值。以上就是关于NOIP2016普及组第一题的题解。