Задача на языке Lisp

Создать класс Самолёт со свойствами: Марка, Модель, Максимальная скорость (в км/ч), Максимальная высота (в метрах). Определить виртуальный метод «Стоимость» — стоимость самолёта, рассчитываемую по формуле Максимальная скорость * 1000 + Максимальная высота * 100 Определить также метод «Информация», который возвращает строку, содержащую информацию об объекте: Марка, Модель, Максимальную скорость, Максимальную высоту и Стоимость.
Создать также класс наследник Бомбардировщик, в котором переопределить метод «Стоимость», который вернёт удвоенную стоимость относительно формулы для класса Самолёт. Также создать класс Истребитель — наследник класса Самолёт, для которого переопределить метод «Стоимость» как утроенную стоимость, относительно формулы стоимости для Самолёта.
В главной программе (либо по нажатию на кнопку) создать объект класса Самолёт, класса Бомбардировщик, класса Истребитель. Вывести на экран (или форму) информацию о самолётах.