Помощь - Поиск - Пользователи - Календарь
Полная версия: Задачи по матрицам.
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Hellmotor
1. Заполнить прямоуг. Матрицу единицами и нулями в шахматном порядке, начиная с верхнего левого угла.
2. Найти в каждой строке матрицы макс. и мин. элементы и поместить их на место первого и последнего эл-та строки, соответственно. Матрицу напечатать в общепринятом виде.
3. Задан массив А размером (N*M) и вектор В размером N . Элементы первого столбца массива А упорядочены по убыванию. Включить массив В в качестве новой строки в массив А с сохранением упорядоченности по эл-там первого столбца.


Заранее всем спасибо.
klem4
В чем конкретно проблема ? FAQ: Матрицы

+ Поиск

1 Задача

вариант 1:

procedure CreateMatrix(var mx: TMatrix; n, m: Integer);
var
i, j: Integer;
begin
for i := 1 to n do
for j := 1 to m do
if odd(i) = odd(j) then mx[i, j] := 1 else mx[i, j] := 0;
end;


Hellmotor
А что такое odd(i) - можно ли заменить odd каким-нить другим словом?

Я теории уже по матрицам столько начитался... но все равно не догоняю. Я конечно понимаю, что на этом форуме сидят компьютерные гении, но я не из вашего числа (пока). Поэтому хотелось бы увидеть то, что я прошу - т.е. решение задач.
2 klem4 - спасибо за первую.
klem4
odd(i) возвращает true если i - НЕчетное

odd(i) == (i mod 2 <> 0)
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.