Предмет: Информатика,
автор: NIKITA6125
Помогите составить программу в PascalABC.
составить программу для вычисления стоимости X театральных билетов по 150 руб.и Y билетов по 100 руб.
Ответы
Автор ответа:
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 руб.
// Внимание! Если программа не работает, обновите версию!
begin
var (x,y):=ReadInteger2('Введите значения X и Y:');
Writeln('Стоимость билетов составит : ',150*x+100*y,' руб.')
end.
Пример
Введите значения X и Y: 12 27
Стоимость билетов составит : 4500 руб.
Автор ответа:
0
А что тут происходит
Автор ответа:
0
var (x,y):=ReadInteger2('Введите значения X и Y:');
Автор ответа:
0
ReadInteger2() выводит подсказ "Введите значения X и Y:", после чего запрашивает ввод значений двух целых чисел (это ясно из имени). Введенные значения присваиваются переменным, имена которых указаны в левой части оператора присваивания, а тип этих переменных PascalABC.NET выводит автоматически по типу правой части.
Автор ответа:
0
В результате "появляется" целочисленная переменная Х, получающая первое из введенных значений, и аналогичная Y, получающая второе значение.
Автор ответа:
0
Один этот оператор заменяет описание и два оператора в терминах паскаля более старых версий: var x,y:integer; Write('Введите значения X и Y: '); Read(x,y);
Интересные вопросы
Предмет: Математика,
автор: ldbcde
Предмет: Физкультура и спорт,
автор: pepebay
Предмет: Русский язык,
автор: mansurkaldybaeyv
Предмет: Математика,
автор: NastyxaTop