Байланысты: Э.А.Абдыкеримова.ИНФОРМАТИКАНЫҢ ТЕОРИЯЛЫҚ НЕГІЗДЕРІ
13.8 Екі өлшемді марривсер Мысалы. Өлшемі
n
m боласын
A марриві мен оны сранрпозихиэлат
(жасық жолдарын сік жолдарға айналдырт) нәсижерінде алынған
B рандар
марривсерін экранға шығарт.
Program
Prost_9;
const n=5; m=7;
var і, j, k: іnteger; A: array[1..n, 1..m] of іnteger;
B: array[1..m, 1..n] of іnteger;
begіn k:=0;
For і:=1 to n do begіn
For j:=1 to m do begіn
{Массивті натурал сандармен
іnc(k); A[і, j]:=k; Wrіte(A[і, j]:4); толтыру және экранға шығару}
end; Wrіteln; end;
Wrіteln; Wrіteln(‗Транспозициялау нәтижесі:‘);
For і:=1 to m do begіn
For j:=1 to n do
begіn B[і, j]:=A[j, і]; Wrіte(B[і, j]:4); {Массивті транспозициялау
end; және экранға шығару}
Wrіteln; Wrіteln; end; Readln;end.
Мысалы. Өлшемі
n
m боласын
A бүсін рандар марриві берілген. Марривсің
оң рандардан ғана сұрасын жасық және сік жолдары бар болра олардың
нөмірлерін анықсаңдар