Построить квадратную матрицу порядка 2n

@myxayan · Регистрация: 16.10.2012

Построить квадратную матрицу порядка 2n
Паскаль изучаю только 2 месяц, прошу не сильно сложно описать программу)

@ermolay · 16.10.2012, 17:28

не совсем понятное задание. Как элементы соотносятся с n, как изменяются в промежутке, например, 33..3?

Добавлено через 3 минуты
хм, подумал, было, 33 (тридцать три) это меня в тупик загнало

вот решение (было в самом низу, в разделе похожие темы, полезно иногда заглядывать).. https://www.cyberforum.ru/pascal/thread228420.html

@myxayan · 19.10.2012, 20:52 **[ТС]**

если что я сделал прогу, кому надо, то вот:

Pascal

uses crt;
const n=11;
var
 x:array[1..n] of integer;
 a:array[1..2*n,1..2*n] of integer;
 i,j:byte;
 
begin
for i:=1 to n do
 x[i]:=n-i+1;
 for i:=1 to n do
 write(x[i],' ');   writeln;
 for i:=1 to 2*n do
  for j:=1 to 2*n do
  begin
   if (j<=n) and (i<=n) then     a[i,j]:=x[j];
   if (j>n) and (i<=n) then a[i,j]:=2* x[j-n];
   if (j<=n) and (i>n) then a[i,j]:= 3*x[j];
   if (j>n) and (i>n) then a[i,j]:= 4*x[j-n];
   end;
   for i:=1 to 2*n do
    begin
        writeln;
      for j:=1 to 2*n do
     write(a[i,j]:3);
   end;
   end.

@myxayan 4 / 4 / 8 Регистрация: 16.10.2012 Сообщений: 93
		1
	Построить квадратную матрицу порядка 2n 16.10.2012, 17:12. Показов 3851. Ответов 2 Метки нет (Все метки) Построить квадратную матрицу порядка 2n Паскаль изучаю только 2 месяц, прошу не сильно сложно описать программу) Изображения 0

@ermolay 3451 / 2389 / 2135 Регистрация: 04.12.2011 Сообщений: 3,966
	16.10.2012, 17:28	2
	не совсем понятное задание. Как элементы соотносятся с n, как изменяются в промежутке, например, 33..3? Добавлено через 3 минуты хм, подумал, было, 33 (тридцать три) это меня в тупик загнало вот решение (было в самом низу, в разделе похожие темы, полезно иногда заглядывать).. https://www.cyberforum.ru/pascal/thread228420.html 0

Опции темы

Построить квадратную матрицу порядка 2n

Решение