Помощь - Поиск - Пользователи - Календарь
Полная версия: Задача на матрицу и массив.
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Kidman
Задача на матрицу и массив.

Задан массив С1,С2,...Сn. Рассматривая их по очереди, выводить элемент Ci, если он больше любого из элементов i-ой строки матрицы. Также найти сумму элементов матрицы.
Ну найти сумму я смогу, а вот с первой частью помогите пожалуйста.
volvo
Kidman
Уточни задание, какова размерность матрицы?
Kidman
Да это всё равно! Ну например 5х5.
volvo
Kidman
Нет, не все равно... Значит, так... Если дана матрица А(NxN) и массив С(N), то задача решается вот так (набираю прямо здесь, так что могут быть мелкие погрешности):
Код

const
 n = 5;
var
 a: array[1 .. n, 1 .. n] of integer;
 c: array[1 .. n] of integer;
 i, j, max: integer;

begin
 for i := 1 to n do
   begin
     max := a[i, 1];
     for j := 2 to n do
       if a[i, j] > max then max := a[i, j];
     if c[i] > max then write(c[i]:5);
   end;
 writeln;
end.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.