Двумерные массивы, как решить?

@LedZep · Регистрация: 18.05.2009

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

Уважаемые участники форума, помогите пожалуйсто решить две задачи.

1) Найти сумму элементов в КАЖДОМ столбике двумерного массива.

2)Даны два думерных массива А и В одинакового размера. Создать массив С, где каждый элемент равен 1(True), если соответствующие элементы А и В имеют одинаковый знак, иначе элемент равен 0(False).

За реннее большое спасибо за помощь))

@Arustarh Dark · 18.05.2009, 19:16

Задача раз:

Delphi

const
  MaxX = 25;
  MaxY = 30;
var
  matrix:array [1..MaxX, 1..MaxY] of integer;
  summ:array [1..MaxX] of integer;
  x,y:integer;
begin
  for x:=1 to MaxX do
    begin
      for y:=1 to MaxY do
        begin
          matrix[x,y]:=Random(20000)-10000;
          summ[x]:=summ[x]+matrix[x,y];
        end;
    end;
end.

Добавлено через 2 минуты 14 секунд
Задача два:

Delphi

const
  MaxX = 25;
  MaxY = 30;
var
  matrixA,matrixB:array [1..MaxX, 1..MaxY] of integer;
  matrixC:array [1..MaxX, 1..MaxY] of boolean;
  x,y:integer;
begin
  for x:=1 to MaxX do
    begin
      for y:=1 to MaxY do
        begin
          matrixA[x,y]:=Random(20000)-10000;
          matrixB[x,y]:=Random(20000)-10000;
          matrixC[x,y]:=(matrixB[x,y]*matrixA[x,y])>0;
        end;
    end;
end.

@LedZep · 18.05.2009, 19:28 **[ТС]**

Спасибо! Но как это будет выглядеть в паскале? С выводом ответа?

@Arustarh Dark · 18.05.2009, 19:58

А это домашнее задание

ЗЫЖ И, кстати, в заданиях ничего про вывод ответа не говорилось.

@LedZep · 18.05.2009, 20:04 **[ТС]**

Ну на экран то вывести надо) Пожалуйсто помоги как в паскале оформить задачи, у меня не получается. От этого моя годовая зависит, и аттестат соответственно) Пжлст....

@LedZep 0 / 0 / 0 Регистрация: 18.05.2009 Сообщений: 3
		1
	Двумерные массивы, как решить? 18.05.2009, 18:45. Показов 1046. Ответов 4 Метки нет (Все метки) Уважаемые участники форума, помогите пожалуйсто решить две задачи. 1) Найти сумму элементов в КАЖДОМ столбике двумерного массива. 2)Даны два думерных массива А и В одинакового размера. Создать массив С, где каждый элемент равен 1(True), если соответствующие элементы А и В имеют одинаковый знак, иначе элемент равен 0(False). За реннее большое спасибо за помощь)) 0

@LedZep 0 / 0 / 0 Регистрация: 18.05.2009 Сообщений: 3
	18.05.2009, 19:28 [ТС]	3
	Спасибо! Но как это будет выглядеть в паскале? С выводом ответа? 0

@Arustarh Dark 62 / 63 / 13 Регистрация: 08.06.2008 Сообщений: 243
	18.05.2009, 19:58	4
	А это домашнее задание ЗЫЖ И, кстати, в заданиях ничего про вывод ответа не говорилось. 0

@LedZep 0 / 0 / 0 Регистрация: 18.05.2009 Сообщений: 3
	18.05.2009, 20:04 [ТС]	5
	Ну на экран то вывести надо) Пожалуйсто помоги как в паскале оформить задачи, у меня не получается. От этого моя годовая зависит, и аттестат соответственно) Пжлст.... 0