Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Laly
0 / 0 / 0
Регистрация: 17.11.2015
1

Дана матрица С.Найти наибольший элемент матрицы С и сумму квадратов ее элементов

25.12.2013, 02:28. Просмотров 249. Ответов 0
Метки нет (Все метки)

program ABC;
const
Nmass=10;
type
T2m=array[1..Nmass,1..Nmass] of real;
var
C:T2m;
i,j,N,M:byte;
max,S:real;
BEGIN


//вывод двумерного массива
write('введите число строк N=');
readLn(N);
write('введите число столбцов M=');
readLn(M);
writeLn('вводите массив C');
for i:=1 to N do
for j:=1 to M do
begin
write('C[',i,',',j,']=');
readLn(C[i,j]);

end;

//вывод двумерного массива
writeLn('Выводим двумерный массив C');
for i:=1 to N do
begin
for j:=1 to M do
write(C[i,j]:7:2);
writeLn;
end;

//поиск наибольшего элемента
max:=C[1,1];
for i:=1 to N do
for j:=1 to M do
if C[i,j]>max then
max:=C[i,j];
writeln('max=',max:7:2);

//подсчет суммы квадратов элементов массива
S:=0;
for i:=1 to N do
for j:=1 to M do
S:=S+sqr(C[i,j]);
writeln('S=',S:7:2);

END.

0.36 -15.60 13.80
-1.10 2.40 1.61
0.00 -3.00 16.20
4.10 5.40 3.90 сама матрица.как ее сделать с файлом?никак не пойму
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.12.2013, 02:28
Ответы с готовыми решениями:

Дана матрица X(m,n). Найти сумму элементов, расположенных по периметру матрицы, и сумму внутренних элементов.
Дана матрица X(m,n). Найти сумму элементов, расположенных по периметру матрицы,...

Дана матрица!Отсортировать положительные элементы.Найти наибольший элемент.
Здравствуйте!Задача: Дана матрица n*m.Отсортировать положительные элементы...

Дана действительная матрица порядка n. Найти сумму элементов, расположенных в закрашенной части матрицы на рисунке
Дана действительная матрица порядка n. Найти сумму элементов, расположенных в...

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

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

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.12.2013, 02:28

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

Дана матрица размера M × N и целое число K (1 ≤ K ≤ M). Найти сумму и произведение элементов K-й строки данной матрицы.
Дана матрица размера M × N и целое число K (1 ≤ K ≤ M). Найти сумму и...

Дана действительная квадратная матрица порядка n, найти наименьший и наибольший элементы матрицы, и поменять их местами друг с другом.
1.Дана действительная квадратная матрица порядка n, найти наименьший и...


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

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

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