Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Uchenik66677
07.04.2023 16:05 •
Информатика
Составить программу в pascalabc. составить программу для вычисления стоимости x театральных билетов по 150 руб.и y билетов по 100 руб.
Ответ:
tynvik
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 оценок)
Популярные вопросы: Информатика
Aleksandrall
08.01.2021 16:43
На тесте по информатике было , дословно не помню, но суть такая: запишите условие удовлетворяющие помеченным элементам массива. и дан двумерный массив n*n. предположим что помечены...
balashova1296
13.11.2020 20:21
3. текст программы с ошибкой представлен ниже: program n1; var a: array [1..8] of integer; s, k: integer; beginfor k : = 1 to 8 do readln (a[k]); s : = 0; for k : =1 to 8 doif...
Dayun3212
03.06.2020 03:35
Формат записи какого оператора описан на языке паскаль if условие then оператор ...
георг9
23.10.2022 12:05
Выведите на экран первые 15 чисел последовательности: 1,4,7,10,...
sleeplessness5
05.05.2022 17:22
7. (2 ) рассмотрите изображение.определите примитивы, использованныепри созданий модели....
elinanagimova
01.12.2021 16:26
Составьте программу которая определяет количество положительных,отрицательных чисел и нулей среди введенных чисел...
Лuзуня
15.12.2021 23:00
Пользователь работал с каталогом с: . сначала он поднялся на один уровень вверх, затем спустился на один уровень вниз, в каталог теплота, затем вновь поднялся на один уровень...
Мастер1списывания
17.04.2022 14:00
Основные функции текстового редактора ...
pushkinaksenya
07.09.2022 08:44
Запишите уравнения реакций в молекулярном и ионном виде: 1. k2co3+bacl2= 2.h3po4+koh= 3.fe+2oh=fe(oh)2 н...
milana00071
07.09.2022 08:44
Нагревается или охлаждается идеальный газ при расширении, если его давление и объем связаны формулой pv^n=const, где n 1. масса газа остается постоянной....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var (x,y):=ReadInteger2('Введите значения X и Y:');
Writeln('Стоимость билетов составит : ',150*x+100*y,' руб.')
end.
Пример
Введите значения X и Y: 12 27
Стоимость билетов составит : 4500 руб.