Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
zybi
15.03.2020 23:34 •
Информатика
25 ! (составьте программу паскаль) уличный продавец газет получает а рублей с продажи каждой из первых 50 газет. с продажи каждой из остальных газет он получает на 20% больше. вычислите дневной заработок продавца, k газет в день.
Показать ответ
Ответ:
АльфисГугу
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 оценок)
Популярные вопросы: Информатика
Философияна5
13.05.2020 06:03
Установите соответствие блоков блок-схем описанию действий...
zonanip
11.04.2023 03:46
При написании электронных писем для выражения эмоций часто используются смайлики. например, : ) -улыбка, : ( огорчение. придумайте набор смайликов для выражений следующих эмоций:...
ikonnikov1997
13.09.2022 16:24
Составить листинг программы в паскале. создать файл f вещественных чисел. найти максимальную компоненту и дописать её в конец файла исходную максимальную компоненту уменьшить в два...
BraveBeast
13.09.2022 16:24
Какую анаграмму можно составить из слова соринка...
supertriom
11.12.2021 14:48
Составьте программу, которая будет определять тип треугольника, если пользователь введет его самый большой угол. (программа турбо паскаль)...
yosipkf
15.05.2023 11:17
Строки (цепочки символов латинских букв) по следующему правилу. первая строка состоит из одного символа – латинской буквы «а». каждая из последующих це-почек создаётся такими действиями:...
KimSuho01
17.08.2020 03:34
Из букв ниже данных слов, переставив их, получите термин, связанный с информатикой и икт. обратите внимание: хотя в названии фигурирует слово «азбука», искомые слова расположены не...
polikarpova05
28.07.2021 23:21
Имеется вещественный массив, состоящий из 9 элементов.найти сумму, среднее арифметическое и произведение всех элементов....
yarabar
28.07.2021 23:21
Решается судьба! ! на ! в ниже пословицах и поговорках отдельные слова или несколько последовательно идущих букв образуют термин, связанный с информатикой и икт. искомые термины начинаются...
незнайка1187
12.01.2023 01:54
Как в прямоугольнике разместить 5 зайцев чтобы возле каждой стены было по 2 зайца...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.