Ввести первую букву названия реки и внести справку по ее длину и количество притоковсделать блок схему и код​

a - уровень продаж, а затем зп первого менеджераb - второго менеджераc - третьегоуровень продаж у всех разный.язык программирования: паскальvara, b, c: integer; beginreadln (a); if a < 500 thena : = 0.03 * a + 200; if (a > 500) and (a < 1000) thena : = 0.05 * a + 200; if a > 1000 thena : = 0.08 * a + 200; readln (b); if b < 500 thenb : = 0.03 * b + 200; if (b > 500) and (b < 1000) thenb : = 0.05 * b + 200; if b > 1000 thenb : = 0.08 * b + 200; readln (c);   if c < 500 thenc : = 0.03 * c + 200; if (c > 500) and (c < 1000) thenc : = 0.05 * c + 200; if c > 1000 thenc : = 0.08 * c + 200;   if (a > b) and (a > c) thena : = a +200; elseif b > c thenb : = b + 200; elsec : = c + 200; wreteln ('зп первого менеджера: ', a, '$'); wreteln ('зп второго менеджера:   ', b, '$');   wreteln ('зп третьего менеджера:   ', c, '$')end.

Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace zn
{
    class Program
    {
        public static void Main(string[] args)
        {
            int sum = 0;
            int m = 1;
            Console.Write("Введите n > ");
            int n = Convert.ToInt32(Console.ReadLine());
            for(int i=0; i<n; i++)
            {
                Console.Write("Введите число > ");
                int c = Convert.ToInt32(Console.ReadLine());
                if (c.ToString().EndsWith("3") || c.ToString().EndsWith("4"))
                    sum += c;
                if (c % 5 == 0 && c % 3 != 0)
                    m *= c;
            }
            Console.WriteLine("Сумма чисел заканчивающихся на 3 или на 4: " + sum);
            Console.WriteLine("Произведение чисел, делящихся на 5, но не на 3: " + m);
            Console.ReadKey();
        }
    }
}