Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
kolisnyk98
20.09.2021 02:54 •
Информатика
25 ! (составьте программу паскаль) уличный продавец газет получает а рублей с продажи каждой из первых 50 газет. с продажи каждой из остальных газет он получает на 20% больше. вычислите дневной заработок продавца, k газет в день.
Показать ответ
Ответ:
siplatoffmatvei
21.04.2020 08:25
Var
k: integer;
a, s: real;
begin
write('Начальная стоимость: ');
readln(a);
write('Число проданных газет: ');
readln(k);
if k <= 50 then s := k * a
else
begin
s := 50 * a;
s := s + (k - 50) * a * 1.2;
end;
writeln('Выручка составила ', s, ' руб.');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ayzilyamannano
29.05.2021 19:12
Типы условий 1 сложное и простоепростые и составныепервое и второеполная и сокращеная...
ZEWER
24.09.2021 08:21
Pascal. Вводится трёхзначное число. Определить количество различных пятизначных чисел, которое можно составить из цифр данного числа....
jhdjshshdh
20.05.2022 00:42
РЕБЯТ ХЭЛП ! ! ! ! На бесконечном поле имеется лестница. Сначала лестница спускается вниз слева направо, затем спускается вниз справа налево. Высота каждой ступени – одна...
Ира0386
24.09.2022 12:24
Распечатайте таблицу значений Y=3*x-5 на промежутке от -A до A Sample Input: 3 Sample Output: -14 -11 -8 -5 -2 1 4 очень надо...
Mmaal
23.11.2021 19:07
Найти наименьший элемент в двумерном массива?...
Evdjr
09.02.2023 14:55
Вкаком стиле написан текст? зачеркни предложение, которое не подходит по стилю. род растений мимоза составляют травы, кустарники, небольшие деревья. растет мимоза в основном...
zayetsnataki
11.07.2022 10:23
Подобрать красивый стих в произведению моцарта....
spirt708ozrmv0
11.07.2022 10:23
Обитатели суши, добывающие пищу в море...
hdhdhdhehd
11.07.2022 10:23
110-11 10 в параллелепипеде abcda1b1c1d1 точки к, р и м принадлежат соответственно ребрам аа1, а1в1 и вс. постройте сечение параллелепипеда плоскостью крм. можно построение...
Министрелия2222
11.07.2022 10:23
Напиши сочинение для 4 класса 22 марта отмечается всемирный день воды каков смысл этого девиза...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
k: integer;
a, s: real;
begin
write('Начальная стоимость: ');
readln(a);
write('Число проданных газет: ');
readln(k);
if k <= 50 then s := k * a
else
begin
s := 50 * a;
s := s + (k - 50) * a * 1.2;
end;
writeln('Выручка составила ', s, ' руб.');
end.