Уличный продавец газет получает а рублей с продажи каждой из первых 50 газет. С продажи...

Question

Уличный продавец газет получает а рублей с продажи каждой из первых 50 газет. С продажи каждой из остальных газет он получает на 20% больше. Разработайте программу, которая вычислит заработок продавца, если он продаст за день 200 газет. Зафиксируйте свои действия на каждом из этапов решения этой задачи.ПЛИЗ ОЧЕНЬ НАДО ПЖПЖПЖ ДАЮ 17 БАЛЛОВ

Comments

только буква дольно быть Z

---

Ж**

Answer 1

Var
wan_money, following_money:Real;
money, a, dwesti:Real;
begin
dwesti := 200;
writeln('Введите сколько продавец получает с 1-ой газеты');
readln(wan_money);
following_money := wan_money + (20/100);
writeln('С первой из 50 газет продавец получает', wan_money);
writeln('С последующих газет он получает:', following_money);
writeln('');
money := wan_money*4;
a := 200-money;
money := money+(a*following_money);
writeln('Продавец получит:', money);
readln;
end.

Comments

а 5,6 этап