Составьте программу генерирующую одномерный массив из элементов двумерного массива А(N,N),расположенных над главной диагональю
123456789101112131415161718192021222324252627const m = 100;vari,j,n: byte;arr1: array [1..m,1..m] of integer;arr2: array [1..m] of integer;beginwrite(Ко-во эл-ов квадратной матрицы: );readln(n);for i:=1 to n dobeginfor j:=1 to n dobeginarr1[i,j]:=random(50);write(arr1[i,j], );end;writeln;end;writeln(Полученный массив:);for i:=1 to n dofor j:=1 to n doif (j < n-i+1) thenbeginarr2[i]:=arr1[i,j];write(arr2[i], );end;writeln;end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
