Вопрос по информатике:
Дана матрица 5Х5.
вывести ее в транспортированом виде, поменять местами строки со столбцами.
P.S Turbo Pascal
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 12.05.2017 19:05
- Информатика
- remove_red_eye 8421
- thumb_up 8
Ответы и объяснения 1
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.
- 13.05.2017 18:11
- thumb_up 7
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.