Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Отличница846
23.08.2022 19:27 •
Информатика
Составить программу в pascalabc. составить программу для вычисления стоимости x театральных билетов по 150 руб.и y билетов по 100 руб.
Ответ:
Cheather
07.10.2020 04:10
// 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 руб.
0,0
(0 оценок)
Популярные вопросы: Информатика
MeriDu3
16.10.2021 21:56
Используйте калькулятор windows для решения : дано: ip-адрес узла 128.107.0.55 исходная маска подсети 255.255.255.0 новая маска подсети 255.255.255.252 найти: сколько добавлено...
aaa1616
16.10.2021 21:56
Используйте калькулятор windows для решения : дано: ip-адрес узла 192.135.250.180 исходная маска подсети 255.255.255.0 новая маска подсети 255.255.255.248 найти: сколько добавлено...
mihail20012
27.02.2021 09:01
Как можно открыть несколько рисунков в павер поинт ,так чтобы каждый рисунок открылся на новом слайде.много рисунков так что нужно открыть всё сразу,но чтобы каждый открылся на...
89086443040
27.02.2021 09:01
Вкоробке лежат карандаши и ручки. ручек-35. сообщение о том, что из коробки достали карандаш, несёт 3 бита информации. сколько всего предметов в коробке?...
qwexxw
14.04.2022 23:49
Отсортируйте велечины в порядке возрастания 3 байта,25 бит,1 кбайт,1025 байт...
lvcenkoirina
28.04.2020 23:18
Какие программы и папки входят в состав пакета Microsoft Office 2007? Чтобы это узнать выполните следующие команды: Пуск/Microsoft Office. Если все откроется, то что находится...
щгоот
23.03.2022 03:59
Для чего используется кэширование памяти в микропроцессоре? 1) для согласования работы устройств с разным быстродействием за счет введения тактов ожидания для более быстродействующего...
Дина19986
29.10.2021 08:24
Что такое вектор прерывания: 1) номер линии запроса прерывания 2) содержимое регистра флагов в момент прерывания 3) адрес подпрограммы-обработчика этого прерывания 4) тип прерывания...
Lena111115
19.07.2021 06:12
Решить , ! oпределите значение d после выполнения фрагмента программы: d: =3255; f: =d div 15-17; z: =d div (f*5); d: =d mod (z+1);...
veronichkasape
18.11.2020 03:12
Пошагова составить схему алгоритм вывода среднего из трёх чисел в виде блок-схемы вход: три числа выход: среднее число...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var (x,y):=ReadInteger2('Введите значения X и Y:');
Writeln('Стоимость билетов составит : ',150*x+100*y,' руб.')
end.
Пример
Введите значения X и Y: 12 27
Стоимость билетов составит : 4500 руб.