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

Первый вариант:Var   A:real;   k:integer;BeginWrite('Стоимость одной газеты: ');ReadLn(A);Write('Количество газет: ');ReadLn(k);if k <= 50 then WriteLn('Заработок продавца: ',k*A,' руб.')else WriteLn('Заработок продавца: ',(A*((k-50)*1.2+50)):0:2,' руб.')End.Var k:integer;    S,A:real;BeginWrite('Стоимость одной газеты: ');ReadLn(A);Write('Количество газет: ');ReadLn(k);if k <= 50 then S:=k*Aelse S:=A*((k-50)*1.2+50);WriteLn('Заработок продавца: ',S:0:2,' руб.');End.Пример работы программы:Стоимость одной газеты: 30.15Количество газет: 200Заработок продавца: 6934.50 руб.