побочная диагональ - Помощь студентам

Женька Good · 27.12.2011, 21:17

Помогите исправить для побочной диагонали:

Код:

 For i:=1 to n do begin
 For j:=1 to n do begin
  W[j,25+j-1]:=0;
  Write(w[i,j]:5:0);
  end;
  writeln;
  end;

Сейчас для главной.

Mad_Cat · 27.12.2011, 22:12

главная была всю жизнь a[i,i]; a[i,n-i+1] --- побочная

27.12.2011, 21:17	#1
Женька Good Форумчанин Регистрация: 15.03.2011 Сообщений: 126	побочная диагональ Помогите исправить для побочной диагонали: Код: `For i:=1 to n do begin For j:=1 to n do begin W[j,25+j-1]:=0; Write(w[i,j]:5:0); end; writeln; end;` Сейчас для главной.

27.12.2011, 22:12	#2
Mad_Cat Made In USSR! Старожил Регистрация: 01.09.2010 Сообщений: 3,657	главная была всю жизнь a[i,i]; a[i,n-i+1] --- побочная "...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..." (c) Юрий Клинских aka "Хой"

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Побочная диагональ массива	KyJIJIEP	Общие вопросы C/C++	2	27.05.2010 13:21
Побочная диагональ	BaronVik	Паскаль, Turbo Pascal, PascalABC.NET	3	28.04.2010 09:47
Побочная диагональ в матрице	armref	Помощь студентам	3	28.01.2010 13:14
Побочная диагональ. Сортировка	dido171	Паскаль, Turbo Pascal, PascalABC.NET	1	23.12.2008 13:32
Вопрос: Побочная диагональ матрицы в С++	john350	Помощь студентам	4	16.03.2008 22:19