Расчитайте стоимость проезда всей семьи в авто если извесна стоимость билета в междугороднем автобусе.Стоимость билета в экспрессе на 50% дороже чем в междугороднем автобусе а в маршрутке на 60% дороже чем на экспрессе Требуется приобрести 2 полных билета и два детских со скидкой 50%

var  bus, express, taxi: real;begin  Write('Введите стоимость автобусного билета ->');  Readln(bus);  bus := 3 * bus; { стоимость на семью }  express := 1.5 * bus;  taxi := 1.6 * express;  Writeln('Автобус- ', bus:0:2, ', экспресс- ', express:0:2, ', такси- ', taxi:0:2)end.Тестовое решение:Введите стоимость автобусного билета ->642.50Автобус- 1927.50, экспресс- 2891.25, такси- 4626.00