Налог=0 если начисленно <5000р , 12% если >5000р но <7000р и 20% если начисленно < или = 7000р . Напишите формулу расчёта налога

1) файл паскаля приложен.
2) код на c#
        static void Main(string[] args)        {            int a, b;            a = Convert.ToInt32(Console.ReadLine());            b = Convert.ToInt32(Console.ReadLine());            if (a > 2)            {                Console.WriteLine(a / 2);                Console.WriteLine(b - 1);            }        }
3) Код на vb
dim a as integer = 0
dim b as integer = 0
a = cint(console.readline())
b = cint(console.readline())
if a > 2 then
console.writeline( a / 2)
console.writeline(b - 1)
end if

Объясняю: нужно найти сумму каждого участника, после чего найти максимальное значение и вывести его на экран. 

Сначала мы вводим эти самые , потом складываем. Далее Sort3(Iv,Pet,Sid) - это функция. Если вы не знакомы с функциями, то просто перерисуйте вместо этого укрупненного блока все, что на следующей странице, вместо переменных а, в и с подставляя те переменные, которые вы используете для хранения суммы участников. 

Что делает функция Sort3: он сортирует по убыванию значения, хранящиеся в переменных а,в и с. После чего для того, чтобы получить максимальное значение, нам достаточно вывести первый элемент - а. Функция Swap  выполняет обмен значений переменных. Sort2 - сортирует два элемента. Она вс для Sort3. 

В основной программе вместо переменных а,в и с использовались переменные Iv, Pet и Sid. При неиспользовании функций подставляйте их. 

Можно использовать простые развилки и не заморачиваться с Sort3, но выходит неэффективно, некрасиво.При увеличении числа участников количество развилок вырастет в несколько раз - оно вам надо? Проще отсортировать.