Сформировать квадратную матрицу n-го порядка по данному образцу

@Vanga · Регистрация: 10.05.2016

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

Сформировать квадратную матрицу n-го порядка по данному образцу:
Название: лолол.PNG
Просмотров: 12

Размер: 10.1 Кб

@Puporev · 10.05.2016, 16:48

Pascal

const n=8;
var a:array[1..n,1..n] of byte;
    i,j:byte;
begin
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    if(i in [1,n])or(j in [1,n])then a[i,j]:=1
    else a[i,j]:=0;
    write(a[i,j]:2);
   end;
  writeln;
 end;
end.

@Vanga 0 / 0 / 0 Регистрация: 10.05.2016 Сообщений: 5
		1
	Сформировать квадратную матрицу n-го порядка по данному образцу 10.05.2016, 16:43. Показов 1057. Ответов 1 Метки нет (Все метки) Сформировать квадратную матрицу n-го порядка по данному образцу: 0

Опции темы

Сформировать квадратную матрицу n-го порядка по данному образцу

Решение