Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
mihaill
0 / 0 / 0
Регистрация: 30.09.2011
Сообщений: 8
1

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

30.09.2011, 22:31. Просмотров 944. Ответов 1
Метки нет (Все метки)

написать программу которая в массиве случ.чисел С[1..5,1..5] меняет местами значения элементов главной и вспамогательной диагонали
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.09.2011, 22:31
Ответы с готовыми решениями:

Написать программу, которая в массиве случайных чисел С[1.5,1.5] меняет местами значения элементов главной и вспомогательной диагонали
Написать программу, которая в массиве случайных чисел С меняет местами значения элементов главной и...

Поменять местами элементы главной и побочной диагонали матрицы
Нужно помочь с тремя заданиями.(ниже) желательно сделать к ним и блок схемы. 1. Создать...

Поменять местами две матрицы n × n, стоящие на главной диагонали
Дана матрица 2n × 2n, которая условно состоит из четырех матриц n × n. Поменять местами две матрицы...

Поменять местами строку, содержащую минимальный элемент главной диагонали матрицы, со строкой с номером q
Ребят помогите сделать задание. Думал, думал. ничего не получается. Вот условие: Даны натуральные...

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

1
denisneposeda
46 / 46 / 36
Регистрация: 18.10.2010
Сообщений: 212
01.10.2011, 02:35 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
uses crt;
var
i,x,j: integer;
a: array [1..5,1..5] of integer;
begin
for i:=1 to 5 do
 for j:=1 to 5 do
  a[i,j]:=random(10);
 
for i:=1 to 5 do
begin
for j:=1 to 5 do
write(a[i,j]:5);
writeln;
end;
writeln;
 
j:=0;
for i:=1 to 5 do
begin
 x:=a[i,i];
 a[i,i]:=a[i,5-i+1];
 a[i,5-i+1]:=x;
end;
 
for i:=1 to 5 do
begin
for j:=1 to 5 do
write(a[i,j]:5);
writeln;
end;
 end.
1
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.10.2011, 02:35

Найти в каждой строке матрицы максимальный элемент и поменять его местами с элементами главной диагонали
Обработать матрицу, элементами которой являются случайные значения функции f(x)= 10/(1+x2); x ....

Найти в каждой строке матрицы максимальный элемент и поменять его местами с элементами главной диагонали
Обработать матрицу, элементами которой являются случайные значения функции f(x)= 10/(1+x2); x ....

Найти в каждой строке матрицы наибольший элемент и поменять его местами с элементом главной диагонали
Найти в каждой строке наибольший элемент и поменять его местами с элементами главной диагонали....


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

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

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