Определить числа b1,…,bm, равные соответственно наименьшим значениям элементов строк матрицы

@Алена1232 · Регистрация: 13.03.2016

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

Дана действительная матрица. Определить числа b1,…,bm, равные соответственно наименьшим значениям элементов строк.

@ROS88 · 14.03.2016, 20:00

Delphi

     randomize;
     for i := 1 to 4 do
       for j := 1 to 4 do
         begin
           A[i, j] := RandomRange(-100, 100);
           StringGrid1.Cells[j-1, i-1] := IntToStr(A[i, j]);
         end;
     for i := 1 to 4 do
       begin
         MIN[i] := A[i, 1];
         for j := 2 to 4 do
           if (MIN[i] <= A[i, j]) then
             MIN[i] := A[i, j];
       end;

@Алена1232 · 14.03.2016, 20:08 **[ТС]**

Спасибо!

@ROS88 · 14.03.2016, 20:11

Сообщение от Алена1232

Спасибо!

Не за что. Если еще возникнут вопросы обращайтесь. Буду на форуме постараюсь помочь!

@Алена1232 0 / 0 / 0 Регистрация: 13.03.2016 Сообщений: 28
		1
	Определить числа b1,…,bm, равные соответственно наименьшим значениям элементов строк матрицы 14.03.2016, 19:57. Показов 1743. Ответов 3 Метки нет (Все метки) Дана действительная матрица. Определить числа b1,…,bm, равные соответственно наименьшим значениям элементов строк. 0

@Алена1232 0 / 0 / 0 Регистрация: 13.03.2016 Сообщений: 28
	14.03.2016, 20:08 [ТС]	3
	Спасибо! 0

@ROS88 138 / 136 / 100 Регистрация: 10.03.2015 Сообщений: 553
	14.03.2016, 20:11	4
	Сообщение от Алена1232 Спасибо! Не за что. Если еще возникнут вопросы обращайтесь. Буду на форуме постараюсь помочь! 0

Опции темы