Даны основания и высота равнобедренной трапеции. Найти площадь трапеции. Дано вещественное число а. Пользуясь только операцией умножения, получить a7 за четыре операции

Язык программирования не указан. Напишу на Haskell.

• square :: Double -> Double -> Double -> Double
• square a b h = (a + b) * h / 2
• a7 :: Double -> Double
• a7 a = e
• where
• b = a * a
• c = b * a
• d = c * c
• e = d * a