Question

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

Answer 1

Pascal

 var   a,a2,z : real; 
   begin 
 readln (a); 
 z := a * 50; 
 a := a * 1.2; 
 z := z + a * 150;
  writeln (z:3:2);
 end.