If a number cannot be divided for example 10/3 to divide it into 2 parts of 3.33 * 2 + 3.34 2 decimal places can do in addition to do more than 5/8 of the 2 decimal places is divided into two 0.62 0.63 * 4 * 4
Should be how to implement

CodePudding user response:

10 * 100=1000;
1000 div 3=333;
X:=333 * (3, 1);
Y:=1000 - x;
A:=strtofloat (formatfloat (' 0.00 ', x/100));
B:=strtofloat (formatfloat (' 0.00 ', y/100));