Question

Помогите составить программу в PascalABC.
составить программу для вычисления стоимости X театральных билетов по 150 руб.и Y билетов по 100 руб.

Answer 1

// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (x,y):=ReadInteger2('Введите значения X и Y:');
  Writeln('Стоимость билетов составит : ',150*x+100*y,' руб.')
end.

Пример
Введите значения X и Y: 12 27
Стоимость билетов составит : 4500 руб.

Answer 2

А что тут происходит

Answer 3

var (x,y):=ReadInteger2('Введите значения X и Y:');

Answer 4

ReadInteger2() выводит подсказ "Введите значения X и Y:", после чего запрашивает ввод значений двух целых чисел (это ясно из имени). Введенные значения присваиваются переменным, имена которых указаны в левой части оператора присваивания, а тип этих переменных PascalABC.NET выводит автоматически по типу правой части.

Answer 5

В результате "появляется" целочисленная переменная Х, получающая первое из введенных значений, и аналогичная Y, получающая второе значение.

Answer 6

Один этот оператор заменяет описание и два оператора в терминах паскаля более старых версий: var x,y:integer; Write('Введите значения X и Y: '); Read(x,y);