Практикум по программированию на языке Turbo Pascal. Часть 2. Портнягина В.В - 104 стр.

члена в виде массива и передачу этого массива в подпро-
грамму. Результатом работы должен быть массив коэффи-
циентов частного и остаток. Обратите внимание на то, что в
массиве коэффициентов должны содержаться и нулевые ко-
эффициенты.
    3. Даны две квадратные вещественные матрицы п-го по-
рядка (n = 10). Выведите на экран квадрат той из них, в кото-
рой наименьший след, считая, что такая матрица одна.
    Указания к решению задачи 3.
    След матрицы – это сумма элементов, расположенных на
главной диагонали.

     Вариант 12
     1. Пусть даны натуральные числа k, l, m, вещественные
х1, х2, ..., xn, х1, х2, ..., xn, y1, y2, ..., yn. Получите:
    ⎧min( y1 , ..., yi ) + max( z1 , ..., z m ), если max( x1 , ..., xk ) ≥ 2,
  t=⎨
    ⎩1 + (max( x1 , ..., xk )) , если max( x1 , ..., xk ) < 2.
                              2



    2. Дана непустая последовательность слов, в каждом из
которых от 1 до 6 латинских букв; между соседними словами
– запятая, за последним точка. Вывести все слова, у которых
одинаковые «соседи», т. е. совпадают предыдущие и после-
дующие слова.
    Указания к решению задачи 2.
    Определите процедуру readword (w), которая вводит
очередное слово и присваивает его 6-ти символьной строке
w, а запятую или точку, следующую за словом, присваивает
некоторой глобальной переменной.
    3. В ЭВМ поступают результаты соревнований по плава-
нию для трех спортсменов.
    Выберите и напечатайте лучший результат. Решите зада-
чу для следующих наборов данных:
    1) 11,3; 10,6; 11; 2) 10; 10,9; 13 3) 16; 18; 13.
    Указания к решению задачи 3.
    Используйте процедуру определения минимального из
трех чисел.

    Вариант 13
                                     104