Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
PAN_DA
1 / 1 / 13
Регистрация: 27.11.2013
Сообщений: 52
#1

квадратная матрица символьного типа. Транспонировать ее. Вывести на экран элементы, расположенные на побочной диагонали - Turbo Pascal

11.02.2014, 13:46. Просмотров 394. Ответов 1
Метки нет (Все метки)


http://www.cyberforum.ru/turbo-pascal/thread1392809.html
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
11.02.2014, 13:46
Я подобрал для вас темы с готовыми решениями и ответами на вопрос квадратная матрица символьного типа. Транспонировать ее. Вывести на экран элементы, расположенные на побочной диагонали (Turbo Pascal):

Квадратная матрица, поменять местами элементы главной и побочной диагонали.
Дана действительная квадратная матрица порядка N, все элементы какого разные....

Дана матрица. Заменить все элементы, расположенные на побочной диагонали и ниже её
Дана матрица размерностью 9x9. Заменить все элементы, расположенные на побочной...

Дана действительная квадратная матрица порядка 12. Заменить нулями все её элементы, расположенные на глав-ной диагонали и выше неё.
Дана действительная квадратная матрица порядка 12. Заменить нулями все её...

Транспонировать элементы матриц относительно побочной диагонали.
Помогите решить данную задачу с помощью процедур В двумерных массивах A и В...

Зеркально отразить её элементы относительно побочной диагонали и вывести результат на экран.
Дана квадратная матрица N*M, состоящая из натуральных чисел. Зеркально отразить...

1
Puporev
Модератор
54128 / 41761 / 28874
Регистрация: 18.05.2008
Сообщений: 98,288
11.02.2014, 14:15 #2
Лучший ответ Сообщение было отмечено mik-a-el как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
uses crt;
const nmax=10;
var a:array[1..nmax,1..nmax] of char;
    n,i,j:integer;
    x:char;
begin
clrscr;
randomize;
repeat
write('Размер матрицы от 2 до ',nmax,' n=');
readln(n);
until n in [2..nmax];
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=chr(65+random(26));
    write(a[i,j]:2);
   end;
  writeln;
 end;
for i:=2 to n do
for j:=1 to i-1 do
 begin
  x:=a[i,j];
  a[i,j]:=a[j,i];
  a[j,i]:=x;
 end;
writeln('Транспонированная матрица');
for i:=1 to n do
 begin
  for j:=1 to n do
  write(a[i,j]:2);
  writeln
 end;
writeln('Элементы побочной диагонали');
for i:=1 to n do
write(a[i,n-i+1]:2);
readln
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.02.2014, 14:15
Привет! Вот еще темы с решениями:

Дана квадратная матрица. Поменять местами максимальный элемент на главной диагонали и минимальный элемент на побочной диагонали.
Дана квадратная матрица. Поменять местами максимальный элемент на главной...

Дана квадратная матрица .В побочной диагонали найти колличество отрицательных элементов
дана квадратная матрица .В побочной диагонали найти колличество отрицательных...

Дана квадратная матрица A порядка M. Найти среднее арифметическое элементов ее побочной диагонали.
Как необходимо прописать 25 строку? подмогите плиз... Program maxim; Uses...

Заменить еденицами все ее элементы,расположенные на побочной диагонали
1)Дана матрица порядка М.Заменить еденицами все ее элементы,расположенные на...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru