написать программу вычисления зарплаты продавца если в воскресенье с каждой проданной газеты продавцу начисляется 16руб в остальные дни 10 руб
известно:а-кол-во проданных газет
n-номер дня недели.в который работали продавцы
ПАСКАЛЬ

var a,n:integer;

begin

   read(a,n);

   if(n = 7) then

       a := a * 16

   else

       a := a * 10;

   write(a);

end.