Дано натуральное число n, действительное число х, действительная матрица n * 2n. Получить последовательность b1, . bn из нулей и единиц. Где b1 = 1

@_Patrick_ · Регистрация: 07.11.2012

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

Дано натуральное число n, действительное число х, действительная матрица n * 2n. Получить последовательность b1, ... bn из нулей и единиц. Где b1 = 1, если элементы i-й строки матрицы не более х, bi = 0 в противном случае.

Добавлено через 18 часов 38 минут
Вверх тему.

@Anand · 16.04.2013, 19:01

Примерно так будет:

Delphi

var
  i,j,n:Integer;
  x:Real;
  A:array of array of Real;
  B:array of Real;
begin
  ...
  SetLength(A,n,2*n);
  SetLength(B,n);
  ...
  for i:=0 to n-1 do
  begin
    for j:=0 to 2*n-1 do
      if A[i,j]>x then
        begin
          B[i]:=0;
          Break;
        end;
    if j=2*n then
      B[i]:=1;
  end;
end;

@_Patrick_ 0 / 0 / 0 Регистрация: 07.11.2012 Сообщений: 23
		1
	Дано натуральное число n, действительное число х, действительная матрица n * 2n. Получить последовательность b1, . bn из нулей и единиц. Где b1 = 1 16.04.2013, 17:46. Показов 4048. Ответов 1 Метки нет (Все метки) Дано натуральное число n, действительное число х, действительная матрица n * 2n. Получить последовательность b1, ... bn из нулей и единиц. Где b1 = 1, если элементы i-й строки матрицы не более х, bi = 0 в противном случае. Добавлено через 18 часов 38 минут Вверх тему. 0

Опции темы

Дано натуральное число n, действительное число х, действительная матрица n * 2n. Получить последовательность b1, . bn из нулей и единиц. Где b1 = 1

Решение