Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
231 / 0 / 0
Регистрация: 25.12.2009
Сообщений: 17

квадратная матрица

25.12.2009, 14:39. Показов 1144. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
помогите получить квадратную матрицу порядка n:

(1 2 3 4 n
. . . . . . . . . .
n-2 n-1 n
n-1 n . . . . . 0
n . . . . . . . 0 0 )(побочная диагональ=n, ниже побочной диагонали 0)

после дискретки голова не варит, буду очень признателен
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
25.12.2009, 14:39
Ответы с готовыми решениями:

Массив, квадратная матрица и квадратная матрица 2
Помогите с тремя задачами: 1. В массиве R (5x5) упорядочьте строки по возрастанию элементов главной диагонали. 2. Заданную...

Квадратная матрица
Помогите плиз решить =) сори что по урк. "Дано квадратну матрицю D, одержати нову матрицю Q, у якій елементи останнього рядка й...

Квадратная матрица
Дана действительная квадратная матрица порядка n. Требуется найти наибольший по модулю элемент матрицы и построить новую матрицу порядка...

7
 Аватар для Gorev
135 / 132 / 30
Регистрация: 08.12.2009
Сообщений: 565
Записей в блоге: 3
25.12.2009, 14:49
помогите получить квадратную матрицу порядка n:

(1 2 3 4 n
. . . . . .
n-2 n-1 n
n-1 n 0
n )

после дискретки голова не варит, буду очень признателен
Pascal
1
2
3
4
5
6
7
8
9
10
uses crt;
const n=100;
var a:array [1..n] of integer;i:integer;
begin
for i:=1 to n do
begin
a[i]:=a[i]+i;
writeln(a[i]);
end;
end.
ну вот типо этого можно сделать дальше, что снизу.

Добавлено через 52 секунды
я описал только первую строку, дальше сам
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
25.12.2009, 14:51
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses crt;
var n,i,j:byte;
begin
clrscr;
write('n=');
readln(n);
for i:=1 to n do
 begin
  for j:=1 to n do
  if j<=n-i+1 then write(i+j-1:4)
  else write('0':4);
  writeln;
 end;
readln
end.
0
231 / 0 / 0
Регистрация: 25.12.2009
Сообщений: 17
25.12.2009, 15:01  [ТС]
не могу заполнить то, что выше побочной диагонали
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
25.12.2009, 15:04
zevs-2009, А я что написал? Просто если нужна матрица, то вместо write(); напиши a[i,j]:=
0
231 / 0 / 0
Регистрация: 25.12.2009
Сообщений: 17
25.12.2009, 15:04  [ТС]
Gorev, нет, это не то. нужно заполнить квадратную матрицу, а не одномерные массивы
0
 Аватар для Gorev
135 / 132 / 30
Регистрация: 08.12.2009
Сообщений: 565
Записей в блоге: 3
25.12.2009, 15:05
Двумерный массив чтоль?
0
231 / 0 / 0
Регистрация: 25.12.2009
Сообщений: 17
25.12.2009, 15:15  [ТС]
Puporev, сейчас попробую, спасибо

Добавлено через 9 минут
Puporev, спасибо, парни, сработало, а то я тут второй час пишу программу на 2 листа, запутался в корень
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
25.12.2009, 15:15
Помогаю со студенческими работами здесь

квадратная матрица
Создать квадратную матрицу порядка n: |1 2 3 ... n-1 n | |2 1 2 ... n-2 n-1 | |3 ...

Квадратная матрица
Данная целочисленные квадратная матрица. Нужно написать такую программу, чтобы она вычисляла: 1) сумму элементов в тех строках,...

квадратная матрица
Помогите решыть задачю: Дана квадратная матрица. Найти максимальный элемент строки и поменять его с элементом этой строки, стоящим на...

Квадратная матрица
Задача: Дана квадратная матрица. Заменить две ее первые строки последним из столбцов, в котором находится минимальный элемент матрицы. ...

Квадратная матрица
Дана действительная квадратная матрица порядка 10. В строках с от-рицательным элементом на главной диагонали найдите сумму всех элемен-тов.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Новые блоги и статьи
Отправка уведомления на почту при изменении наименования справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
Контроль уникальности заводского номера - вариант №2
Maks 24.03.2026
В отличие от предыдущего варианта добавлено прерывание циклов, также добавлены новые переменные для сохранения контекста ошибки перед прерыванием цикла: Процедура ПередЗаписью(Отказ, РежимЗаписи,. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++
8Observer8 24.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip
Жизнь в неопределённости
kumehtar 23.03.2026
Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .
Модель здравоСохранения: работники работают быстрее после её введения.
anaschu 23.03.2026
geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .
Контроль уникальности заводского номера - вариант №1
Maks 23.03.2026
Алгоритм контроля уникальности заводского (или серийного) номера на примере нетипового документа выдачи шин для спецтехники с табличной частью, разработанного в конфигурации КА2. Данные берутся из. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru