Есть ответ 👍

Составить программу для в уличный продавец газет получает a рублей с продажи каждой из первых 50 газет. с продаж каждой из остальных газет он получает на 20% больше. разработайте программу,которая вычислит заработок продавца,если он продает за день 200 газет.

211
350
Посмотреть ответы 2

Ответы на вопрос:


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.
qidanabala
4,7(25 оценок)

1)word

2) DOS

3) Paintbrush

Популярно: Информатика