Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
svetik48148
0 / 0 / 0
Регистрация: 25.03.2017
Сообщений: 8
1

Найти сумму строк матрицы, среднее значение элементов матрицы и минимальный элемент

25.03.2017, 17:03. Просмотров 180. Ответов 3
Метки нет (Все метки)

Сумма строк (сделать это все в Паскаль)
Задана двумерная матрица размером 10х10 элементов, заполненная случайными числами из диапазона [0, 100]. Найти сумму строк матрицы, среднее значение элементов матрицы и минимальный элемент матрицы, вывести результаты на экран и записать в файл "output.txt" сумму элементов четных строк таблицы.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.03.2017, 17:03
Ответы с готовыми решениями:

Найти среднее арифметическое элементов матрицы и сумму элементов тех строк матрицы, в которых отрицателен элемент главной диагонали
Найти среднее арифметическое элементов матрицы и сумму элементов тех строк...

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

Создать функцию, определяющую сумму элементов строк матрицы, если на главной диагонали матрицы располагается отрицательный элемент
Сформировать две квадратные матрицы(двухмерных массива) {ai,j }n,m ,{ bi,j}k,l...

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

Найти суммы элементов первой и последней строк матрицы. Увеличить на значение максимума всей матрицы строку
Ввести целочисленный двумерный массив A (N x M) , вывести его. Найти суммы...

3
Hitoku
Модератор
1703 / 1302 / 1400
Регистрация: 28.10.2016
Сообщений: 4,240
Завершенные тесты: 4
25.03.2017, 17:45 2
Цитата Сообщение от svetik48148 Посмотреть сообщение
Найти сумму строк матрицы
для каждой строки отдельно?
0
Puporev
Модератор
54701 / 42113 / 29079
Регистрация: 18.05.2008
Сообщений: 99,397
25.03.2017, 18:00 3
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
const n=10;
var a:array[1..n,1..n] of integer;
    i,j,ss,mn,sc:integer;
    sr:real;
    f:text;
begin
randomize;
writeln('Матрица');
sr:=0;
mn:=101;
sc:=0;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=random(101);
    write(a[i,j]:4);
    sr:=sr+a[i,j];//общая сумма
    if a[i,j]<mn then mn:=a[i,j];//минимум
    if i mod 2=0 then sc:=sc+a[i,j];//сумма элементов четных строк
   end;
  writeln;
 end;
sr:=sr/n/n; //среднее всех элементов
writeln;
writeln('Суммы строк матрицы');
for i:=1 to n do
 begin
  ss:=0;
  for j:=1 to n do
  ss:=ss+a[i,j];
  writeln('строка ',i:2,' сумма=',ss);
 end;
writeln('Среднее значение элементов матрицы=',sr:0:2);
writeln('Минимальный элемент=',mn);
assign(f,'output.txt');
rewrite(f);
writeln(f,' Сумма элементов четных строк=',sc);
close(f);
end.
1
Hitoku
Модератор
1703 / 1302 / 1400
Регистрация: 28.10.2016
Сообщений: 4,240
Завершенные тесты: 4
25.03.2017, 18:00 4
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
const n=10;
var
    a:array[1..n,1..n] of integer;
    min,sf,s:integer;
    i,j:byte;
    outp:text;
    ave:real;
begin
    randomize;
    assign(outp,'output.txt'); rewrite(outp);
    sf:=0; ave:=0;
    for i:=1 to n do begin
        for j:=1 to n do begin
            a[i,j]:=random(101); write(a[i,j]:3,' ');
            if not odd(i) then sf:=sf+a[i,j];
            ave:=ave+a[i,j];
        end;
        writeln;
    end;
    write(outp,sf); close(outp);
    min:=a[1,1]; ave:=ave/sqr(n);s:=0;
    for i:=1 to n do begin
        for j:=1 to n do begin
            if a[i,j]<min then min:=a[i,j];
            s:=s+a[i,j];
        end;
        writeln('Сумма ',i,' строки - ',s); s:=0;
    end;
    writeln('Минимальный элемент = ',min,'; Среднее арифметическое = ',ave);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.03.2017, 18:00

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

Вычислить сумму и среднее арифметическое элементов всех нечетных строк матрицы
Уважаемые программисты!Помогите пожалуйста решить задачу! Дана прямоугольная...

Найти сумму элементов строк матрицы [A], размером NxM. Вывести на печать исходную матрицу и сумму строк.
Найти сумму элементов строк матрицы , размером NxM. Вывести на печать исходную...


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

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

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