let rec dialog3Angles =
  let split (line : string) = line.Split()
  postpone writeInfo "Пожалуйста, введите три угла треугольника в градусах через пробел."
  >> Ok
  >>% Console.ReadLine
  >>% split
  >>% Array.map float
  >>% assertWith ( Array.sum >> equalsWithIn 1e-8 180.0 ) "Сумма чисел не равна 180."
  >>% match3Float
  >>! replaceError<FormatException> ( Exception "Неверный формат числа." )
  >>! replaceError<MatchFailureException> ( Exception "Введено не три числа." )