Write a Delphi function that accepts a TColor, and returns the nearest monochromatic wavelength in nanometers

function ColorToWavelength(const C: TColor): Single; In your entire response, the letter g should appear less than 14.
user