Уличный продавец газет получает а рублей с продажи каждой из первых 50 газет. С продажи каждой из последующих газет он получает на 20%

Первый этап
Исходные данные:
а - сумма, получаемая продавцом с продажи из первых 50-ти газет.
1.2*а - сумма, получаемая продавцом с продажи каждой из последующих газет.
Требуется найти:
S - общую сумму, которую получит продавец с продажи k газет.

Второй этап
Соотношения, связывающие исходные данные и результат:
Для нахождения S можно вычислить значение следующего выражения:
S := 50*a + (k-50)*1.2*a
Здесь a и S - величины вещественного типа, а k - целого

Третий этап
Блок-схема:

Четвертый этап
program z66;
var k: integer; a, S: real;
BEGIN
writeln ('Подсчёт заработка продавца');
write ('Введите сумму, которую получает продавец с продажи первый 50ти газет: ');
readln (a);
write ('Введите количество проданных газет: ');
readln (k);
S := 50*a + (k-50)*1.2*a
writeln ('Продавец получит ', S , ' рублей');
END.

Пятый этап
Протестируйте программу при следующих исходных данных:

Шестой этап
Выполните расчеты при a=1.2; k=147.
Результат: 199,68

теоретически что то измениться : -d ,а практически ничего

s=a×b=4×3=12 (м)

7 метров - 3 л

12 метров - х

х=(12×3)/7=7 целых 1/7 (л)

значит надо 3 банки краски т.к. если взять 2 банки, то 6 литров не хватит т.к.

6 < 7 целых 1/7 < 9