Вычислить произведение элементов по столбцам массива с[1..7,1..7]

@razor052 · Регистрация: 23.02.2010

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

@Inadequate · 11.04.2010, 15:53

Pascal

for j := 1 to 7 do
begin
  pr := 1;
  for i := 1 to 7 do
    if a[i, j] = 0 then
    begin
      pr := 0;
      break;
    end
    else
      pr := pr * a[i, j];
  end;
  WriteLn(pr, ' ');
end;

@razor052 15 / 15 / 0 Регистрация: 23.02.2010 Сообщений: 53
		1
	Вычислить произведение элементов по столбцам массива с[1..7,1..7] 11.04.2010, 15:48. Показов 1113. Ответов 1 Метки нет (Все метки) Вычислить произведение элементов по столбцам массива с[1..7,1..7] 1

	11.04.2010, 15:53

Вычислить произведение элементов по столбцам массива с[1..7,1..7]

Решение