Много ! не копируйте с других сайтов, там не правильно! и дочитайте текст до конца ! уличный продавец получает 'a' рублей с продажи каждой из первых 50 газет. с продажи каждой из последующих газет он получает на 20% больше. вычислите дневной заработок продавца, 'k' газет в день. нужно составить программу паскаль для вычисления дневного заработка продавца, где 'a' и 'b' нужно вводить самой. если вы не можете составить программу, то хотя бы написать уравнение решения этой , ведь тогда 'a' и 'k' остаются как есть
a,an,s: real;
begin write('стоимость газеты из первых 50: '); readln(a);
write('число проданных газет: ');
readln(k);
writeln;
if k<=50 then s:=k*a
else
begin
s:=50*a;
an:=a;
for i:=1 to k-50 do
begin
an:=an*1.2;
s:=s+an;
end;
end;
writeln('продано газет ',k,' выручка составила ',s,' руб.');
end.