sozdat sikl ili chto to poxoje na eto

ya sozdal editi i vivoditsya chislo. ix priosvaevaet otdelno labeli. a otdelniy label priosvaevaet vse rezultati. tam est i edit gde vvoditsya dengi. sdelat tak chtobi esli priosvaemie chisli menshe <9 togda samiy minimalniy udalit i dengi delit na 8 rezultatov i umnojat na ostalnie chisli.
naprimer est 1000 rub. a rezultatov 9. 1000/9=111.111
est u nas koefitsenti 5 6 7 8 9 10. teper umnojet na koefi, 111.111*5, 111.111*6 i tak dalee. esli pri umnojenie otvet menshe 1000 to znachit mi v minuse. udalit minimalniy koefitsient naprimer 5, teper u nas v obshem 8 rezultatov. 1000/8=125. teper ostalnie koefi umnojat na 125. esli opyat v minuse to udalit opyat minimalniy. kajdiy raz tak. sdelat algoritm chtobi csegda vichislal koefitsenti kotorie sdelaet nas v plyuse.
u menya programma gotova ostalos tolka etot algoritm.