помогите пожалуйста составить программу для этой задачи в паскале... уличный продавец газет получает a рублей с продажи каждой из первых 50 газет. Спродаж каждой из остальных газет он получает на 20% больше. разработайте программу,которая вычислит заработок продавца,если он продает за день 200 газет.
Program gazeta; Uses Crt; var a,zar: real; begin clrscr; write('Введите прибыль с первых 50 газет:'); readln(a); zar:=a+(150*1.2); writeln; writeln('Прибыль за день:',zar) readkey; end.
