for i:=1 to n do for j:=1 to n do a[i,n-j+1]:=abs(i-j)+1;
Автор: Insomnia 27.12.2010 23:39
Код
const n=5; var a: array[1..n,1..n] of integer; i,j:integer; begin writeln('vvedite massiv'); randomize; for i:=1 to n do for j:=1 to n do a[i,j]:=random(6); for i:=1 to n do for j:=1 to n do write(a[i,j]:3); writeln; for i:=1 to n do for j:=1 to n do a[i,n-j+1]:=abs(i-j)+1; for i:=1 to n do for j:=1 to n do Write(a[i,j]:3); ReadLn end.
вроде вот так.. если считая по главной диагонали, то
Код
const n=5; var a: array[1..n,1..n] of integer; i,j:integer; begin writeln('vvedite massiv'); randomize; for i:=1 to n do for j:=1 to n do a[i,j]:=random(6); for i:=1 to n do for j:=1 to n do write(a[i,j]:3); writeln; for i:=1 to n do for j:=1 to n do a[i,j]:=abs(i-j)+1; for i:=1 to n do for j:=1 to n do Write(a[i,j]:3); ReadLn end.
Автор: Freedom 28.12.2010 0:09
for i:=1 to n do for j:=1 to n do Write(a[i,j]:3);
Write(a[i,j]:3); - тут не правильно, у вас массив типа integer, а не real поэтому write(a[i,j]); и ещё лучше выводить таким образом
For i:=1 to n do begin for j:=1 to n do Write(a[i,j],' '); writeln; end;
Автор: Insomnia 28.12.2010 0:12
хм, верно. спасибо вам большое за помощь
Автор: volvo 28.12.2010 0:34
Цитата
Write(a[i,j]:3); - тут не правильно
С чего бы? У Паскаля изменился синтаксис? Или правильнее вталкивать всегда один пробел после выведенного значения, независимо от того, сколько цифр напечатано, так что-ли?
Ну, тогда попробуй заполнить матрицу 10*10 (вместо 5*5), и увидишь, что твой способ корёжит вывод данных, а write(a[i,j]:3) - нет...
Или теперь специально введенные для удобства в язык средства принято "не уметь использовать", а пользоваться нужно сомнительными самопальными заменителями?
P.S. Как же мне нравится, когда приходит человек, едва-едва знакомый с языком, и начинает налево и направо рассуждать о правильности или неправильности тех или иных конструкций...
Автор: Freedom 28.12.2010 1:32
Цитата(volvo @ 27.12.2010 20:34)
P.S. Как же мне нравится, когда приходит человек, едва-едва знакомый с языком, и начинает налево и направо рассуждать о правильности или неправильности тех или иных конструкций...
Извиняюсь, согласен язык я знаю едва едва, но как говорится на ошибках учатся. Но вот мне интересно зачем автор темы в своих программах заполняет матрицу случайными числами?