Мальчик, продающий на улице газеты, зарабатывает а рублей на продаже каждой из первых 75 газет. На каждой из остальных проданых газет он зарабатывает по х рублей. Напишите программу, которая выведет на экран заработок мальчика, если он продал 133 газеты. Pascal программа

13 Мар 2020 в 19:41
532 +1
0
Ответы
1
program NewspaperSeller;
var
a, x, totalEarned: integer;
i: integer;
begin
a := 5; // заработок на первых 75 газетах
x := 3; // заработок на остальных газетах
totalEarned := 0;
for i := 1 to 75 do
begin
totalEarned := totalEarned + a;
end;
for i := 76 to 133 do
begin
totalEarned := totalEarned + x;
end;
writeln′Заработокмальчика:′,totalEarned,′рублей′'Заработок мальчика: ', totalEarned, ' рублей'Заработокмальчика:,totalEarned,рублей;
end.
18 Апр 2024 в 16:15
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир