PascalABC.NET

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
PascalABC.NET Дана строка, состоящая из символов букв и цифр Между словами вставить запятую и пробел. https://www.cyberforum.ru/ pascalabc-net/ thread2258590.html	*PascalABC.NET Составьте программу, которая строит таблицу значений функции x3+5x2+x-10sin(5x)-1** Составьте программу, которая строит таблицу значений функции x3+5x2+x-10sin(5*x)-1. Количество строк в таблице n, начальное значение аргумента и шаг изменения аргумента step вводятся...
PascalABC.NET Как вытащить из картинки её часть https://www.cyberforum.ru/ pascalabc-net/ thread2258487.html Всем привет. Я создаю свою игру и чтобы не делать много картинок я сделал одну большую со всеми. Вопрос: как забрать из неё часть и пользоваться ей?	PascalABC.NET Как исправить пример программы работы Алгоритма Хаффмана? Доброго времени суток! Дан код программы на языке Паскаль - пример работы алгоритма Хаффмана. Есть задание (с) - "запустить на выполнение, разобраться, что ей давать, чтобы она работала". Прогу... https://www.cyberforum.ru/ pascalabc-net/ thread2258444.html
Вычислить среднеарифметическое значение элементов четных строк PascalABC.NET Задача 5. Дана квадратную матрицу (двумерный массив) А размером k * k, где k = (m + n) mod 3 + 3, (m - номер группы, n - номер студента в списке группы). Элементы матрицы вычислить по выражению Аi,...	PascalABC.NET Вывести все символы строки, заключённые между каждыми двумя точками с запятой https://www.cyberforum.ru/ pascalabc-net/ thread2258157.html В строке имеется несколько символов «точка с запятой» (;). Вывести все символы, заключённые между каждыми двумя точками с запятой.
PascalABC.NET Создать программу, которая описывает химическую таблицу элементов https://www.cyberforum.ru/ pascalabc-net/ thread2258109.html Создать программу, которая описывает химическую таблицу элементов, отображая следующую информацию: название, символьное обозначение, масса атома, заряд ядра. Выполнить вывод данных о хим элементе по...	Программа по теме символы,строки,текстовые файлы PascalABC.NET Файл http://tvd-home.ru/docs/eeg.txt содержит запись ЭЭГ (электроэнцефалограммы) человека, включающую сигналы с 16 электродов (отведений). Каждому отведению соответствует столбец чисел. Столбцы...
PascalABC.NET Массивы записей const n=15; h=20; type rabotniki=record kolvo_dney:integer; oplata:byte; nalog:real; end; mas=array of rabotniki; https://www.cyberforum.ru/ pascalabc-net/ thread2257698.html	PascalABC.NET Модуль Graph3D и компилятор Добрый день! Существует ли возможность использования модуля Graph3D в более ранних версиях языка? Если да, то какими средствами достигается такая возможность? Или имеет смысл просто загрузить свежую... https://www.cyberforum.ru/ pascalabc-net/ thread2257654.html
Найти все действительные корни уравнения методом дихотомии PascalABC.NET Приветствую. Необходимо решить задачу методом дихотомии. Найдите все действительные корни уравнения f(x)=0 на отрезке , если таковые имеются(решение соответствующего уравнения выполнить с точностью...	PascalABC.NET Преобразовать массив, уменьшив каждую его серию на один элемент Решите задачи данной группы, оформив решение в виде процедур генерации, вывода и обработки массивов. Предусмотрите в процедуре генерации массива ввод границ диапазона случайных чисел. Дан массив,... https://www.cyberforum.ru/ pascalabc-net/ thread2257634.html

Hitoku

1754 / 1346 / 1407

Регистрация: 28.10.2016

Сообщений: 4,267

04.06.2018, 11:54

В квадратной матрице поменять местами наибольшие элементы главной и побочной диагоналей - PascalABC.NET - Ответ 12448215

04.06.2018, 11:54. Показов 1117. Ответов 1

Метки (Все метки)

Сообщение было отмечено masyanchik как решение

Решение

Pascal

begin
  var a := MatrRandom(5, 5); a.Println;
  var max1 := a.ElementsWithIndexes.Where(v -> v[1] = v[2]).OrderBy(v -> v[0]).Last;
  var max2 := a.ElementsWithIndexes.Where(v -> v[1] = a.GetLength(1) - v[2] - 1).OrderBy(v -> v[0]).Last;
  Swap(a[max1.Item2, max1.Item3], a[max2.Item2, max2.Item3]);
  writeln; a.Println;
end.

Вернуться к обсуждению:
В квадратной матрице поменять местами наибольшие элементы главной и побочной диагоналей PascalABC.NET

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

04.06.2018, 11:54

Готовые ответы и решения:

В квадратной матрице размером N поменять местами элементы на главной и побочной диагоналях в каждой строке
1) В квадратной матрице размером N поменять местами элементы на главной и побочной диагоналях в...

Для заданной квадратной матрицы порядка n поменять местами элементы главной и побочной диагоналей
1. В однородном массиве, состоящем из n элементов, вычислить: - номер минимального элемента...

В квадратной матрице поменять местами наибольшие элементы главной и побочной диагоналей
В квадратной матрице поменять местами наибольшие элементы главной и побочной диагоналей.

В квадратной матрице поменять местами элементы главной и побочной диагоналей
В квадратной матрицы Е поменять местами элементы главной и побочной диагоналей, предварительно...

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

04.06.2018, 11:54

Помогаю со студенческими работами здесь

В квадратной матрице А(7,7) поменять местами минимальные элементы первой и третьей строк, максимальные элементы главной и побочной диагоналей
Составил программу, но похоже неправильно. При вводе пишет ошибка проверки диапазона и курсор...

В заданной квадратной матрице поменять местами элементы, стоящие на главной и побочной диагонали
Добрый день ! Помогите пожалуйста с задачей,очень нужно! (С++) Дана матрицы А(3,3). В матрице...

поменять местами элементы главной и побочной диагоналей
Здравствуйте. Мне нужно поменять местами элементы главной и побочной диагоналей, без выделения...

Поменять местами элементы главной и побочной диагоналей
Дана матрица целых чисел размером 4х4 (Элемент StringGrid). Button1: Заполнение матрицы...

Наверх