сформировать квадратную матрицу n на n по следущему правилу 1111011100110001

@ИрИнОчКа) · Регистрация: 27.04.2010

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

сформировать квадратную матрицу n на n по следущему правилу 1111011100110001
Сзаранее спасибо)))

@kirill29 · 30.04.2010, 14:33

ИрИнОчКа), какой язык программирования и при чем тут Access?

@ИрИнОчКа) · 30.04.2010, 15:10 **[ТС]**

pascal

@Puporev · 30.04.2010, 16:40

Сообщение от ИрИнОчКа)

по следущему правилу 1111011100110001

И это у Вас квадратная матрица?

Добавлено через 3 минуты

Pascal

uses crt;
const nmax=20;
var a:array[1..nmax,1..nmax] of byte;
    n,i,j:byte;
begin
clrscr;
repeat
write('Размер матрицы=');
readln(n);
until n in [1..nmax];
writeln('Исходная матрица:');
for i:=1 to n do
 begin
   for j:=1 to n do
    begin
     if j>=i then a[i,j]:=1
     else a[i,j]:=0;
     write(a[i,j]:3);
    end;
   writeln;
 end;
readln
end.

@ИрИнОчКа) · 01.05.2010, 19:22 **[ТС]**

спасибо большое!

@ИрИнОчКа) 0 / 0 / 0 Регистрация: 27.04.2010 Сообщений: 7
		1
	сформировать квадратную матрицу n на n по следущему правилу 1111011100110001 30.04.2010, 13:58. Показов 558. Ответов 4 Метки нет (Все метки) сформировать квадратную матрицу n на n по следущему правилу 1111011100110001 Сзаранее спасибо))) 0

@kirill29 2096 / 1261 / 171 Регистрация: 01.02.2009 Сообщений: 2,842
	30.04.2010, 14:33	2
	ИрИнОчКа), какой язык программирования и при чем тут Access? 0

@ИрИнОчКа) 0 / 0 / 0 Регистрация: 27.04.2010 Сообщений: 7
	30.04.2010, 15:10 [ТС]	3
	pascal 0

@ИрИнОчКа) 0 / 0 / 0 Регистрация: 27.04.2010 Сообщений: 7
	01.05.2010, 19:22 [ТС]	5
	спасибо большое! 0