Заполнить числами, начиная с единицы, квадратный массив из NxN элементов «змейкой» - Pascal ABC

  1. Заполнить числами, начиная с единицы, квадратный массив из NxN элементов «змейкой». Пример, для массива 4х4: Код 1 2 3 4 8 7 6 5 9 10 11 12 16 15 14 13 Реализовать ввод размерности с клавиатуры


textual

Код к задаче: «Заполнить числами, начиная с единицы, квадратный массив из NxN элементов «змейкой» - Pascal ABC»

const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
    n,i,j:byte;
begin
repeat
write('Введите размер матрицы от 2 до ',nmax,' n=');
readln(n);
until n in [2..nmax];
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    if odd(i) then a[i,j]:=(i-1)*n+j
    else a[i,j]:=(i-1)*n+n-j+1;
    write(a[i,j]:4);
   end;
  writeln;
 end;
end.

СДЕЛАЙТЕ РЕПОСТ

10   голосов, оценка 3.700 из 5



Похожие ответы
  1. 1) Реализовать динамический массив целых чисел, заполнить его случайными числами от 1 до 100, вывести массив на экран.

  1. Нужно заполнить (квадратную) матрицу a(n,n) числами натурального ряда в последовательности указанной на рисунке и вывести ее на экран. Pascal abc. Рисунок 37. Кто может киньте готовый код, пожалуйста, а то никак не могу понять как решать такое.

  1. Нужно заполнить (квадратную) матрицу a(n,n) числами натурального ряда в последовательности указанной на рисунке и вывести ее на экран. Pascal abc. Делал программу для вывода такой же матрицы с левого верхнего угла, но сделать такую не получается. Кто может киньте готовы код, пожалуйста.

  1. Заполнить массив случайными числами в интервале [-10, 10] и отобрать в другой массив все чётные отрицательные числа.

  1. Помогите заполнить двумерный массив размером 7 7 так 1 0 0 1 0 0 1 0 1 0 1 0 1 0 0 0 1 1 1 0 0 1 1 1 1 1 1 1 0 0 1 1 1 0 0 0 1 0 1 0 1 0 1 0 0 1 0 0 1

  1. Доброго времени суток, нужно организовать массив, но я не знаю как это сделать, помогите.) в общем суть такова. Организовать в оперативной памяти два массива А и В размера N для хранения целых чисел. Массив А заполнить случайными числами из диапазона от К1 до К2. Массив В заполнить значе- ниями в соответствии с заданием Вашего варианта. Используя режим CRT отобразить оба массива на экране с пояснениями и выделением цветом. N=25, К1=3, К2=9. Массив В заполнить теми значениями массива А, которые больше, чем зна- чение элемента А23

  1. Доброго времени суток. Помогите разобраться с задачей. Дан одномерный массив А[20]. Заполнить двумерный массив B(10*10) по следующему правилу: четные строки массива В заполнить элементами расположенными на четных позициях массива А, нечетные строки массива В заполнить элементами расположенными на нечетных позициях массива А.

  1. Здравствуйте. помогите кто чем может, а то уже не думается.. Нужно заполнить квадратную символьную матрицу символами * и ^ так, что бы получился узор из вложенных квадратов. как я понял ,что то типа того: * * * * * * ^ ^ ^ * * ^ * ^ * * ^ ^ ^ * * * * * * Заранее благодарен.