LAB4

35. Из массива В[1..8] убрать все отрицательные элементы, заменив их на значения предыдущих элементов.

36. Найти наибольшее из всевозможных попарных произведений элементов массива А[1..4].

37. Определить, имеются ли в массиве А[1 ..4,1..4] строки, равные первой строке.

38. Вывести элементы той строки двухмерного массива Т[1..N,1..М], сумма элементов которой максимальна.

39.Произвести сортировку массива M[1..10] по возрастанию значений элементов. Полученный массив вывести на экран.

40.Написать программу заполнения массива А[1..N,1..N] нулями и единицами в шахматном порядке.

41.Просуммировать элементы двухмерного массива, сумма индексов которых равна заданной константе

42.Заполнить квадратную матрицу NxN последовательными числами от 1 до

100по спирали.

43.Написать программу, которая меняет местами значения элементов двухмерного массива А[1..N,1.. N], симметричных относительно "вертикальной оси" соответствующей матрицы.

44.Написать программу замены строк соответствующими столбцами в квадратной матрице А[1..N,1.. N] (транспонирование)

45.Написать программу определения номера строки и столбца двухмерного массива чисел А[1..N,1..N], на пересечении которых находится наибольший элемент.

46.Написать программу, которая позволяет напечатать таблицу Пифагора Таблица Пифагора - это квадратная матрица из 10 строк и 10 столбцов, каждый элемент которой определяется формулой: A[i,j]=i*j

47.Заполнить массив А следующим образом:

1 2 . . . 10

11 12 . . . 20

2122 . . . 30

. . .

9192 . . . 100

48.Определить, симметрична ли заданная целая квадратная матрица n-го порядка (относительно главной диагонали).

49.Дана матрица NxM Переставляя ее строки и столбцы, переместить наибольший элемент в верхний левый угол.

50.Заполнить массив А следующим образом:

51. Получить массив В из массива А удалением n-й строка и k-го столбца.

52. Преобразовать массив S, "поворачивая" его вокруг центра на 90 градусов против часовой стрелки.

53.Описать функцию getInt(Name,k) целого типа, возвращающую k-й элемент файла целых чисел с именем Name (элементы нумеруются от 0). Если файл не содержит k-го элемента, то функция возвращает 0. С помощью этой функции вывести пять элементов данного файла с указанными номерами.

54.Описать функцию getLine(Name,k) строкового типа, возвращающую k-ю строку текстового файла с именем Name (строки нумеруются от 0). Если файл не содержит k-й строки, то функция возвращает пустую строку. С помощью этой функции вывести пять строк данного файла с указанными номерами.

55.Описать функцию IntFileSize(Name) целого типа, возвращающую размер файла целых чисел с именем Name. Если файл не существует, то функция возвращает –1. С помощью этой функции определить размер трех файлов с данными именами.

56.Описать функцию TextSize(Name) целого типа, возвращающую число строк в текстовом файле с именем Name. Если файл не существует, то функция возвращает –1. С помощью этой функции определить размер трех файлов с данными именами.

57.Описать процедуру InvertIntFile(Name), меняющую порядок следования элементов файла целого типа с именем Name на противоположный. Если файл не существует или содержит менее двух элементов, то процедура не выполняет никаких действий. Обработать с помощью этой процедуры три файла с данными именами.

58.Описать процедуру SplitIntFile(Name0,k,Name1,Name2), копирующую пер-

вые k (>=0) элементов существующего файла целых чисел с именем Name0 в файл Name1, а остальные элементы — в файл Name2 (прежнее содержимое результирующих файлов стирается). Один из результирующих файлов может оказаться пустым. Применить эту процедуру к файлу Name0, используя указанные значения Name1, Name2 и k.

59.Описать процедуру SplitText(Name0,k,Name1,Name2), копирующую первые k (>=0) строк существующего текстового файла с именем Name0 в файл Name1, а остальные элементы — в файл Name2 (прежнее содержимое результирующих файлов стирается). Один из результирующих файлов может оказаться пустым. Применить эту процедуру к файлу Name0, используя указанные значения

Name1, Name2 и k.

60.Описать процедуру CodeText(Name,k), шифрующую текстовый файл с именем Name, выполняя циклическую замену каждой русской буквы на букву, расположенную в алфавите на k-й позиции после исходной (0<k<11). Например, при k = 3 "А" перейдет в "Г", "а" — в "г", "Я" — в "В". Букву "ё" в алфавите не

учитывать, прочие символы файла не изменять. Используя эту процедуру и зная k, зашифровать1|расшифровать2 данный файл.