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

@Дашустрик · Регистрация: 26.09.2008

Author24 — интернет-сервис помощи студентам

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

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

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

Добавлено через 12 минут 52 секунды
:'(НЕУЖЕЛИ НИКТО ДЕВУШКЕ ПОМОЧЬ НЕ МОЖЕТ?????

@Puporev · 26.09.2008, 15:43

Код

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.

@Дашустрик Дашики 7 / 7 / 1 Регистрация: 26.09.2008 Сообщений: 477
		1
	Найти сумму наименьших элементов каждой строки матрицы и их координат 26.09.2008, 13:24. Показов 2207. Ответов 1 Метки нет (Все метки) *Написать программу обработки матриц,выполнить ее тестирование* Задана квадратная матрица А размером N x N (N<==10), состоящая из действительных элементов.Найти сумму наименьших элементов каждой строки матрицы и их координат. Программа должна содержать следующие процедуры: Процедура ввода размерности матрицы. Процедура ввода элементов матрицы. Процедура вывода элементов исходной матрицы. Процедура вычисления. Процедура вывода результатов. Добавлено через 1 час 2 минуты 50 секунд *ПОМОГИТЕ ПЛИЗ!!!!!!!!!!!!!!!!!!!!* :'( Добавлено через 12 минут 52 секунды :'(НЕУЖЕЛИ НИКТО ДЕВУШКЕ ПОМОЧЬ НЕ МОЖЕТ????? 0

	26.09.2008, 15:43

Опции темы