Дашики
7 / 7 / 1
Регистрация: 26.09.2008
Сообщений: 477
1

Найти сумму наименьших элементов каждой строки матрицы и их координат

26.09.2008, 13:24. Показов 2207. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Написать программу обработки матриц,выполнить ее тестирование
Задана квадратная матрица А размером N x N (N<==10), состоящая из действительных элементов.Найти сумму наименьших элементов каждой строки матрицы и их координат.
Программа должна содержать следующие процедуры:
  • Процедура ввода размерности матрицы.
  • Процедура ввода элементов матрицы.
  • Процедура вывода элементов исходной матрицы.
  • Процедура вычисления.
  • Процедура вывода результатов.



Добавлено через 1 час 2 минуты 50 секунд
ПОМОГИТЕ ПЛИЗ!!!!!!!!!!!!!!!!!!!!
:'(

Добавлено через 12 минут 52 секунды
:'(НЕУЖЕЛИ НИКТО ДЕВУШКЕ ПОМОЧЬ НЕ МОЖЕТ?????
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.09.2008, 13:24
Ответы с готовыми решениями:

Найти сумму наименьших элементов каждой строки матрицы
7. Разработать алгоритмы и программы решения задачи: a) найти сумму наименьших элементов каждой...

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

Найти сумму наименьших элементов каждой строки матрицы и их координаты
Здравствуйте! в Возможно такая темы была уже, но я так и не нашел( В общем задача такая: Задана...

[MASM] Найти сумму наименьших элементов каждой строки матрицы
доброго времени суток, помогите начинающему с решением проблемы: в рабочей проге(с положительными...

1
Почетный модератор
64304 / 47599 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
26.09.2008, 15:43 2
Код
uses crt;
const max=50;
type Tmatr=array[1..max,1..max] of real;
var
  a:Tmatr;
  n:integer;
Procedure VvRaz;
begin
repeat
write('Введите размер матрицы <=10 n=');
readln(n);
until (n>0)and(n<=10);
end;
Procedure VvMatr;
var i,j:integer;
begin
randomize;
for i:=1 to n do
for j:=1 to n do
a[i,j]:=random(10)+random;
end;
Procedure VyvMatr;
var i,j:integer;
begin
writeln('Исходная матрица:');
for i:=1 to n do
  begin
    for j:=1 to n do
    write(a[i,j]:5:2);
    writeln;
  end;
end;
Procedure Vych;
var i,j,jmin:integer;
    min:real;
begin
for i:=1 to n do
   begin
    min:=a[i,1];
    for j:=1 to n do
    if a[i,j]<min then
      begin
        min:=a[i,j];
        jmin:=j;
      end;
    writeln('В строке ',i,' =',(min+i+jmin):0:2);
  end;
end;
begin
clrscr;
VvRaz;
VvMatr;
VyvMatr;
writeln('Сумма наименьших элементов и их координат:');
Vych;
readln
end.
1
26.09.2008, 15:43
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.09.2008, 15:43
Помогаю со студенческими работами здесь

Найти сумму наименьших элементов каждой строки массива
Помогите решить пожалуйста) 1.Дан массив X(N,M). Найти номер той строки в массиве,сумма элементов...

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

Найти произведение наименьших элементов каждой строки матрицы и их координаты
Найти произведение наименьших элементов каждой строки матрицы и их координаты

Найти суммы наименьших элементов каждой строки матрицы размером 5х8, состоящей из элементов целого типа
Извиняюсь за наглость, помогите написать две программы, очень срочно надо, сам не осилю....

Создать функцию, определяющую суммы наибольших и наименьших значений элементов каждой строки каждой матрицы. Вывести на экран исходные матрицы и их
Создать функцию, определяющую суммы наибольших и наименьших значений элементов каждой строки...

Найти сумму элементов каждой четной строки матрицы и произведение элементов каждой нечетной
В матрице D(10,15) найти сумму элементов каждой четной строки и произведение элементов ...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru