Информатика, опубликовано 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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на