Нельзя преобразовать тип Tuple<integer,real> к real?

Анонимный вопрос
  · 2,3 K

program v2;

var

x, a, b, v: real;

begin

writeln('Стоимость билета в бизнес-класс: ');

read(x);

writeln('Количество нераспроданных билетов из бизнес-класса: ');

read(a);

writeln('Количество нераспроданных билетов из эконом-класса: ');

read(b);

v := x*(120 - 0,5*b - a);

write('Цена всех проданных билетов: ', v);

end.

Что делать?

Вы знаете ответ на этот вопрос?
Поделитесь своим опытом и знаниями
Войти и ответить на вопрос
1 ответ

Я проверил вашу программу в Turbo Pascal, она работает корректно.

Единственное что вот в этой строке v := x*(120 - 0,5*b - a); надо ставить точку вместо запятой.

Кроме того, желательно при выводе сделать форматирование чисел для вывода, иначе они выводятся в нудобоваримом виде.

Комментировать ответ…
Присоединяйтесь к экспертному сообществу!

Яндекс.Кью — это сервис экспертных ответов на вопросы. Мы объединяем людей, которые хотят делиться знаниями, помогать друг другу и менять мир к лучшему.

Вы тоже можете стать экспертом!

Узнать больше