VS:EqPercent
.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix
Description
Returns TRUE if num1 & num2 are equal within the given percent.
FUNCTION EqPercent(
value1 :REAL;
value2 :REAL;
percent :REAL) :BOOLEAN;
def vs.EqPercent(value1, value2, percent): return BOOLEAN
Parameters
value1 REAL value2 REAL percent REAL
Example
PROCEDURE Example; VAR num1, num2, num3 :REAL; BEGIN num1 := RealDialog('Enter the first number', '99'); num2 := RealDialog('Enter the second number', '100'); num3 := RealDialog('Enter the percentage', '2'); Message(EqPercent(num1, num2, num3)); END; RUN(Example);
Version
Availability: from All Versions
This is drop-in function.