Gatina
?>

Дана матрица 5х5. вывести ее в транспортированом виде, поменять местами строки со столбцами. p.s turbo pascal

Информатика

Ответы

АльбертовичБерезин58
Program abc; var i, j: byte; arr1, arr2: array [1..5] of array [1..5] of integer; arr: array[1..25] of integer; begin for i : = 1 to 25 do begin arr[i] : = i; end; writeln('array1: '); for i : = 1 to 5 do begin for j : = 1 to 5 do begin arr1[i][j] : = arr[(i - 1) * 5 + j]; write(' ', arr1[i][j], ' '); end; writeln(); end; writeln('array2: '); for i : = 1 to 5 do begin for j : = 1 to 5 do begin arr2[i][j] : = arr1[j][i]; write(' ', arr2[i][j], ' '); end; writeln(); end; end.
Chutaeva381

Ссылка — запись, которая идентифицирует документ или его часть. Используется в документе для связи с другим документом, а также для связи одной части документа с другой частью.

Или же возможно вы имели ввиду гиперссылка, тогда это

Гиперссылка — часть гипертекстового документа, ссылающаяся на элемент в самом документе или на другой объект, расположенный на локальном диске или в компьютерной сети, либо на элементы этого объекта. Гиперссылка может быть добавлена к любому элементу HTML-документа.

Или же если Вам нужна ссылка которую мы вводим в браузере, тогда это называться URL.

URL это единый указатель ресурса — система унифицированных адресов электронных ресурсов, или единообразный определитель местонахождения ресурса.

bochkarevazh

===== PascalABC.NET =====

begin

 // 1

 var a := MatrRandom(5, 5, -99, 99);

 a.Println.ElementsByRow.Where(k -> k.IsEven).Sum.Println;

 Writeln; // только чтобы отделить задачу

 // 2

 a := MatrRandom(10, 10, -99, 99);

 a.Println.ElementsByRow.Where(k -> k mod 3 = 0).Count.Println;

 Writeln; // только чтобы отделить задачу

 // 3

 a := MatrRandom(7, 4, -99, 99);

 a.Println.ElementsByRow.Average.Print

end.

Примечание:

Оформление отдельной задачей делать так:

begin

   var a := MatrRandom(7, 4, -99, 99);  // создание и заполнение

   a.Println.ElementsByRow.Average.Print // решение и вывод

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дана матрица 5х5. вывести ее в транспортированом виде, поменять местами строки со столбцами. p.s turbo pascal
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

sadkofamily61
kettikis
lbeglarova6
bespalovaannaanna
fta1309
andr77716
arbat
myxa120283
Suralevartem
Avdimov5
nataliagorki476
Любовь
saytru5850
buyamel
ravshandzon3019835681