// Peut-on faire l'appoint ?
function solutions=achat(p,a,b,c,d,e,f,g,h)
// a,b,c,d,e,f,g,h désignent respectivement les nombres de pièces de 1 c, 2 c, 5 c, 10 c, 20 c, de 50 c, de 1 € et de 2 € disponibles pour l'achat (nombres entiers >=0) ; prix désigne le prix de l'achat en c.
solutions=[];
for ja=0:a
  for jb=0:b
    for jc=0:c
      for jd=0:d
        for je=0:e
          for jf=0:f
            for jg=0:g
              for jh=0:h
                s=200*jh+100*jg+50*jf+20*je+10*jd+5*jc+2*jb+ja;
                if s==p then
                  solutions=[solutions;[ja,jb,jc,jd,je,jf,jg,jh]];
                end;
              end;
            end;
          end;
        end;
      end;
    end;
  end;
end;
endfunction