Ваэробусе, вмещающем 160 пассажиров, три четверти мест находятся в салонах класса и одна четверть мест - в салоне бизнес-класса. стоимость билета в салоне бизнес класса составляет х рублей, что в два раза выше стоимости билета в салонах класса. разработайте программу, которая вычислит сумму денег, полученную авиакомпанией от продажи билетов на этот рейс, если известно, что остались нераспроданными а билетов бизнес-класса и b билетов класса. выделите все этапы решения этой и опишите свои действия на каждом из них. составить в питона,
ответ:
отдел +;
использует приём из "", вывод из "";
пер
n, сумма, сч, скор, макс: цел;
указ
сумма : = 0;
макс : = 0;
вывод.цепь("введите число автомобилей: ");
n : = приём.число();
если n < 1 и n > 30 то вывод.цепь("^ошибка.") иначе
вывод.цепь("^введите скорости: ^");
от сч : = 1 до n вып
скор : = приём.число();
если n < 1 и n > 300 то вывод.цепь("^ошибка."); стоп(0) кон;
увеличить(сумма, скор);
если скор > макс то макс : = скор кон;
вывод.цепь(" ")
кон
кон;
вывод.чвещ("^средняя скорость: %.1f.^", сумма / n, 0, 0, 0);
если макс > = 60 то вывод.цепь("yes") иначе вывод.цепь("no") кон
кон .
объяснение:
function FS(a,b:real):=0.5*a*b;
begin
var a,b:real;
Write('Катеты первого треугольника: '); Read(a,b);
var S1:=FS(a,b);
Write('Катеты второго треугольника: '); Read(a,b);
var S2:=FS(a,b);
if S1>S2 then Writeln('Площадь первого треугольника больше')
else
if S1<S2 then Writeln('Площадь второго треугольника больше')
else Writeln('Площади треугольников равны')
end.
Тестовое решение
Катеты первого треугольника: 4.18 6
Катеты второго треугольника: 5.4 3.9
Площадь первого треугольника больше