Составить программу для в уличный продавец газет получает a рублей с продажи каждой из первых 50 газет. с продаж каждой из остальных газет он получает на 20% больше. разработайте программу,которая вычислит заработок продавца,если он продает за день 200 газет.
211
350
Ответы на вопрос:
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.
Популярно: Информатика
-
Lera1111111110000003.09.2021 13:59
-
ElzaMi1316.07.2021 03:09
-
Вундеркингsd17.01.2022 10:43
-
Kissi111118.04.2023 17:27
-
OT710.08.2020 06:11
-
bulyginanastya18.12.2022 04:01
-
Katya0877715.11.2022 02:17
-
Vika349909.03.2022 12:30
-
собачка3415.04.2023 18:23
-
Ариса2727.09.2020 23:51