codeves天梯装箱问题

StrACPgirl

于 2017-02-08 19:53:30 发布

阅读量361

点赞数

分类专栏： codeves天梯

本文链接：https://blog.youkuaiyun.com/StrACPgirl/article/details/54932027

版权

codeves天梯专栏收录该内容

31 篇文章

订阅专栏

本文介绍了一个关于将多个不同体积的物品放入一个有限容量箱子的问题，并提供了一段使用Pascal语言实现的解决算法。该算法通过递归搜索来找出使得箱子剩余空间最小的物品组合方案。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

有一个箱子容量为V（正整数，0＜＝V＜＝20000），同时有n个物品（0＜n＜＝30），每个物品有一个体积（正整数）。

要求n个物品中，任取若干个装入箱内，使箱子的剩余空间为最小。

分析：水题，直接搜过去了。

var
  n,x,a,max:longint;
  m:array[1..20000] of longint;

procedure try(s,ans:longint);
begin
  if (s<max) and (s>=0) then max:=s;
  if ans>x then exit;
  if s<=0 then exit;
  try(s-m[ans],ans+1);
  try(s,ans+1);
end;

begin
  readln(n);
  readln(x);
  for a:=1 to x do
    readln(m[a]);
  max:=n;
  try(n,1);
  write(max);
end.