Аватар
Информатика, опубликовано 2018-08-22 23:25:44 by Гость

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

Аватар
Ответ оставил Гость

Var
    k: integer;
    a, s: real;

begin
    write(Начальная стоимость: );
    readln(a);
    {write(Число проданных газет:  );
    readln(k);}
    k := 200;
    
    if k     else
    begin
        s := 50 * a;
        s := s + (k - 50) * a * 1.2;
    end;
    writeln(Выручка составила  , s, руб.);
end.

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.