svetsorokina
Новичок
|
1.9. Ввести двумерный массив NN A × , вывести его. Найти среднее арифметическое диагональных элементов (главной и побочной). Все элементы большие найденного значения, расположенные над побочной диагональю возвести в квадрат, а расположенные под ней увеличить на минимум всего массива. 2. Ввести целочисленный двумерный массив NM A × , вывести его. Найти произведение тех элементов, которые нечётны и положительны. Если среди этих элементов встретится максимальный элемент всей матрицы, то не учитывать его в произведении. Найденным произведением заменить предпоследнюю строку матрицы 3.Ввести матрицу NM A × , вывести ее. В каждой строке матрицы найти k – количество положительных элементов. В строках все элементы после k-го увеличить на сумму положительных элементов этой строки. 4.Ввести квадратную матрицу NN A × , вывести ее. На главную диагональ записать " 1", если сумма положительных элементов в соответствующей строке больше максимума всей матрицы и " 1 − " в противном случае. 6.Ввести одномерные массивы 1N X , 2N X . Определить новый вектор- массив 3N X как: ** 3 1 2 XXX =+, где знак «*» означает, что все компоненты этого вектора получены из исходного путём его деления на максимальную компоненту (производится нормировка). (При решении реализовать процедуры ввода и вывода массивов: Vvod1m(A,N,Name) и Vivod1m(A,N,Name); функцию MaxOtr(A,N):<тип массива> – максимум массива; процедуру Delenie(A,N,Chislo) – деление элементов массива на значение Chislo; процедуру Form(A1,A2,A3,N) – формирование третьего массива из пары исходных) 7.Ввести одномерные массивы целых чисел 1 1NX , 2 2NX , 3 3NX . Определить в каждом массиве среднее арифметическое положительных элементов кратных 5 или 3, и записать его целую часть (встроенная функция целой части: trunc(x))) на место 1-го, последнего и предпоследнего элемента соответствующего массива ( при условии существования среднего арифметического). Вывести массивы до преобразования и после (при невозможности вычислить среднее арифметическое, вывести соответствующее сообщение). (При решении реализовать процедуры ввода и вывода массивов: Vvod1m(A,N,Name), Vivod1m(A,N,Name); а также функцию SrAkr53(A,N):real – среднее арифметическое положительных кратных пяти или трём (функция равна « 1 − », если оно не существует); и процедуру Zamena(A,N,Chislo) – замена первого, последнего и предпоследнего значением Chislo)
|