ЕГ
Евгений Гусаров

for i:=1 to N do for j:=i+1 to N do Последняя строка што означает? ..

АС
Александр Самохвалов

for i:=1 - счетчик 1ого цикла, переменной присваивается начальное значение
to N - конечное значение N, когда i == N цикл заверщит свою работу
do - после этого оператора будет оператор что выполняется циклически, в данном случае еще один цикл

аналогично
for j:=i+1
to N
do

Похожие вопросы
почему в паскале выдает ошибку 39( в этой строчке: for i:=1 to n do)?
Подскажите с циклом, как идет последовательность выполнения. /* for (int i=0; i<=5; i++) for (int j=0; j<=5; j++) cout<
Как будет цикл с помощью downto(паскаль) в C+? for i=1 downto n do
Нужна маленькая помощь программиста. чем отличается это for i=1 to n-1 do от этого for i=1 to n do
Восстановите условие задачи по фрагменту программы, если матрица содержит n строк и m столбцов: P :=0; for j:=1 to n do
for i:=2 to 10 do A:=i*3 for i:=1 to 10 do A:=A mod 3 ; информатика помогите)
Помогите, срочно.... Задана целочисленная матрица a[i,j] при i=1..m, образовать одномерный массив B[j] при j=1..n, где ка
Что напичатает программа? For i:=0 to 10 doa[ i ] := i-1;For i :=1 to 10 doa[ i -1]:= a[ i ];a[ 10 ] :=10
В каждом столбце матрицы D[n,m] нулевые элементы переставить в начало столбца (Паскаль) Программа работает неправильно, подскажите как исправитьProgram matr;const N=10;const M=10;var D:array [1..N,1..M] of real;i,j,k:integer;l:real;beginfor i:=1 to n do begin for j:=1 to m do begin D[i,j]:=random(5); if d[i,j]=0 then for k:=i-1 downto 1 do begin l:=d[k+1,j]; d[k,j]:=d[k+1,j]; d[k,j]:=l; end;end;end; for i:=1 to n do begin for j:=1 to m do begin write(D[i,j]:5:2);end; writeln;end; readln;end.
Помогите написать программу... Необходимо написать программу, которая меняла столбцы и строчки местами в матрице (транспонировала) в динамической памяти, в паскале.begin clrscr; getmem(m,n*n*sizeof(integer)); for i:=1 to n do for j:=1 to n do m^[j*n+i]:=vidnosh^[i*n+j]; writeln('Обратная матрица имеет вид: '); for i:=1 to n do begin for j:=1 to n do write(m^[i*n+j]:3); writeln; end;но не работает.