Какая программа выдаст ошибку выполнения? (предполагается, что числа s, f, a лежат в интервале от – 1000 до 1000, а≠0). Поясните.
(a)

Var s, f, a: integer;
Begin
S := f / a;
End. (b)

Var s, f, a: integer;
Begin
S := f + a;
End.

        123  I   61  I   30  I  15  I  7  I  3  I  1  I   
          1    I    1   I    0   I   1   I  1  I  1  I  1  I
             <-----------------------------------------------
ответ; 123 = 1111011 в двоичной с/с
Теперь объяснение:
1) Разлинуй так, как показано на схеме.
2) Число 123 : 2 = 61(ост.1)
3) Число 61 идёт по верхней строчке. Остаток  1  идёт в нижнюю строчку.
4) 61 : 2 = 30 (остаток 1).  Число 30 - следующее число по верхней строчке.
     Остаток 1 - следующее по нижней строчке.
5) Делим 30 на 2, Делится без остатка
     30 : 2 = 15 (ост.0)    15 идёт по верхней строчке.
                                      0 идёт по нижней строчке
6) Деление цифр верхнего ряда на 2продолжаем до тех пор, пока число не
   закончится.
   В нижней строчке у нас будут только единицы и нули.
7)  Начинать записывать число в двоичной системе счисления необходимо
     справа налево, т.е. с конца, как показано стрелочкой.
     И у нас получится 1111011
ответ: 123 = 1111011 в двоичной с/с.
-----------------------------------------------------------------------------------------------------------------
Если что-то не поймёшь, пиши сообщения на мой профиль.

        static void Main()
        {
            int[,] arr = new int[3, 5];
            byte i = 0, j, nech = 0;
            while (i < 3)
            {
                j = 0;
                while (j < 5)
                {
                    Console.Write("arr[{0}, {1}] = ", i + 1, j + 1);
                    arr[i, j] = Int32.Parse(Console.ReadLine());
                    if (arr[i, j++]  2 == 1) nech++; //Сразу считаем нечётные элементы
                }
                Console.WriteLine();
                i++;
            }
            Console.WriteLine();
            for (i = 0; i < 3; i++) //Выводим массив
            {
                j = 0;
                while (j < 5)
                    Console.Write("{0,3}", arr[i, j++]);
                Console.WriteLine();
            }
            Console.WriteLine();
            int buf = arr[0, 2]; //Меняем местами
            arr[0, 2] = arr[2, 1];
            arr[2, 1] = buf;
            for (i = 0; i < 3; i++) //Выводим массив
            {
                j = 0;
                while (j < 5)
                    Console.Write("{0,3}", arr[i, j++]);
                Console.WriteLine();
            }
            long p = 1;
            for (j = 0; j < 5; j++)
                p *= arr[1, j];
            Console.WriteLine("Произведение эл. второй строк равно " + p);
            Console.WriteLine("Тут {0} несчётных элементов", nech);
            Console.ReadKey(false);
        }