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

0 голосов
63 просмотров

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


Информатика (15 баллов) | 63 просмотров
0

2 вариант

0

PascalABC.Net

Дан 1 ответ
0 голосов
Правильный ответ
// 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 руб.
(150k баллов)
0

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

0

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