Ответ:

var i,n,k,a:integer;

begin

write('Введите количество проданных газет ');

readln (k);

write('Введите сколько получает продавец с продажи каждой из первых 50 газет ');

readln (a);

if k<=50 then writeln ('заработок продавца ',k*a)//если продано ровно 50 газет или меньше

else writeln ('Заработок продавца ',50*a+((k-50)*a*1.2))//если продано больше 50 газет

end.

Объяснение:

Если продано ровно 50 газет или меньше, то заработок рассчитывается просто умножением количества газет (k) на стоимость продажи каждой из первых 50 газет (a).

Если продано больше 50 газет, то вычисляем сколько продавец получит за первые 50 газет (50*a - умножаем 50 газет на стоимость продажи каждой из первых 50 газет (a)) и к этому числу прибавляем деньги полученные за продажу остальных газет ((k-50)*a*1.2) - умножаем количество газет проданных после первых 50 (k-50) на стоимость газет с учётом процентов a*1,2)