Помощь - Поиск - Пользователи - Календарь
Полная версия: задача на матрицы
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
sanchoflat
доброе утро, поступил в универ, в школе не было паскаля, а тут сразу задачи решать без объяснения
если не сложно помогите решить задачу:
Найти сумму элементов матрицы и подсчитать число её строк, в пределах каждой из которых элементы упорядочены по возрастанию: Аi1<Ai2<...<Ain
Lapp
Цитата(sanchoflat @ 31.10.2011 9:43) *
Найти сумму элементов матрицы и подсчитать число её строк, в пределах каждой из которых элементы упорядочены по возрастанию: Аi1<Ai2<...<Ain

Сумму примерно вот так:
const
m= 10;
n= 20;
var
a: array[1..m,1..n] of integer;
i,j,s: integer;

begin
{тут задаем матрицу}
s:= 0;
for i:=1 to m do for j:=1 to n do s:= s+a[i,j];
writeln('sum = ', s);
end.

А для подсчета упорядоченых строк можно использовать, например, такой фрагмент кода:
  k:= 0;
for i:=1 to m do begin
j:=1;
while (j<n) and (a[i,j]<a[i,j+1]) do inc(j);
if j=n then inc(k)
end;

Делай и говори, что получается, а что нет. Успехов.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.