пожалуйста помогите написать программу на языке Pascal

какой должна быть длина волны λ ультрафиолетового излучения, падающего на поверхность цинка, чтобы скорость вылетающих фотоэлектронов составляла U, если работа выхода электронов из цинка A? λ=(2*h*c)/(2*A+m*U^2)