ОЧЕНЬ Определите значение переменной S2: S1:=’константа’; S2:=’12’; Insert (S1, S2, 2); а) 12константа б)1константа2 в) константа12 г) к12онстанта 2 Даны значения переменных x и y: x=2, y=12. Какими будут значения этих переменных после выполнения последовательности действий z:=y + 2; y:=x; x:=z + 1 а) x=2; y=12 в) x=15; y=2 б) x=12; y=2 г) x=14; y=2 3 Вычислите значение переменной S: a:=10; b:=2; S:=3; if a а) 12 в) 3 б) 5 г) 2

Не хватает либо цены за билет эконом класса
либо цены за билет бизнес класса.

Uses crt;
var a,b,x,c,d:real;
begin
ClrScr;
writeln('Введите кол-во нераспроданных билетов бизнес класса (а) и кол-во нераспроданных билетов эконом. класса (б) ');
readln(a,b);
// Узнали, сколько осталось нераспроданных билетов разных классов.
c:=160*0.75-b;
// Узнали, сколько билетов продано эконом класса.
d:=160*0.25-a;
// Узнали, сколько билетов продано бизнес класса.
x:=d+c/2;
writeln('Для того, чтобы узнать сколько денег получила авиакомпания за этот рейс нужно число х: ',x,' умножить на цену билета бизнес класса, либо умножить на удвоенную цену одного билета эконом класса');
readln
end.

Или ответ: число которое выведет программа х, например, ответ: 15х

Программа проверена, если что не так пиши