Найти произведение 2*4*6*8*... Умножать до тех пор, пока множитель не станет больше 10. Сделать в паскале ABC net​

Эта программа использует цикл while, чтобы умножать переменную product на четные числа (начиная с 2) до тех пор, пока множитель multiplier не превысит 10. Результат выводится на экран.