квадратная матрица

[Екатерина Воробей]

вот КАК это сделать?

[Вадим Мошев]

Так вам же выше ответили. Вам остаётся лишь переварить эту информацию, преобразовать ей в готовый код.
Вы на каком этапе обучения находитесь?

[Екатерина Воробей]

КАК это сделать?

[Екатерина Воробей]

только начали изучать...напишите пожалуйста полностью код

[Вадим Мошев]

Вы так не научитесь программированию.
Вот вам код. Работоспособность не проверял. Разбирайтесь.

const n=5;
  var mas: array [1..n,1..n] of integer;
      i,j,flag: integer;
begin

	for i:=1 to n do
		for j:=1 to n do
				begin
				  Write('mas[', i,','j']='); read(mas[i, j]);				
				end;
				
	

  flag:=1;
  for i:=1 to n do
    begin
      for j:=1 to n do
        if mas[i,j]<>0 then flag:=0;
      if flag=1 then writeln(i);
      flag:=1;
    end;
end.

[Екатерина Воробей]

спасибо, буду учиться...а что означает? зачем flag присваивать к единице?
flag:=1;
for i:=1 to n do
begin
for j:=1 to n do
if mas[i,j]<>0 then flag:=0;
if flag=1 then writeln(i);
flag:=1;
end;

[Вадим Мошев]

это как бы пометка, которую можно интерпретировать, как да/нет.

[Екатерина Воробей]

в смысле? что значит m здесь?

[Alex11223]

Что за m? n может быть? или mas?)

[Екатерина Воробей]

извините flag что значит?