Заполнить массив змейкой по строкам. Не запускается

@deagle1 · Регистрация: 30.12.2015

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

Добрый день! Помогите пожалуйста, нужно заполнить массив снизу вверх по строкам случайными числами. Нашел примеры заполнения, но они заполняются строго числами от 1 до заданного по порядку. Есть пример кода заполнения сверху вниз, но почему-то не получается запустить, ругается на else.

Pascal
1
2
3
4
5
6
7
8
9
10
11
for i:=1 to n do
 if i mod 2<>0 then
  begin
  dj:=1; jn:=1; jk:=n;
  end;
 else
  begin
   dj:=-1; jn:=n; jk:=1;
  end;
  
 writeln (a[i,j]);

@Puporev · 31.12.2015, 13:27

Сообщение от deagle1

снизу вверх по строкам случайными числами.

А как ты узнаешь что заполнено именно снизу вверх по строкам?

@deagle1 · 31.12.2015, 13:30 **[ТС]**

То есть я ввожу числа с клавиатуры, а потом строится массив. Мне бы хотя бы разобраться сперва с построением сверху вниз по строкам, потом думаю и снизу вверх получится сделать. Я просто привел часть кода, которая должна отвечать как раз за построение змейкой.

@Puporev · 31.12.2015, 13:57

А вообще

Сообщение от deagle1

снизу вверх по строкам

Pascal
1
2
3
for i:=n downto 1 do
for j:=1 to n do
a[ij]:=random(100);

Добавлено через 4 минуты
Если змейкой то так

Pascal
1
2
3
4
5
6
7
8
9
10
11
for i:=n downto 1 do
if odd(i) then
 begin
   for j:=1 to n do
  a[i,j]:=random(100);
 end
else 
 begin
  for j:=n downto 1 do
  a[i,j]:=random(100);
 end;

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

Сообщение от deagle1

Мне бы хотя бы разобраться сперва с построением сверху вниз по строкам,

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
const max=100;
var a:array[1..max,1..max] of integer;
    b:array[1..max*max] of integer;
    n,m,i,j,k:integer; 
begin
write('Введите кол-во строк матрицы: m=');
readln(m);
write('Введите кол-во столбцов матрицы: n=');
readln(n);
randomize;
writeln('Исходный массив:');
for i:=1 to m*n do
 begin
  b[i]:=random(100);
  write(b[i]:4);
 end;
writeln;
for k:=1 to m*n do
 begin
  i:=(k-1)div n+1;{вычислим номер строки и столбца}
  if odd(i) then j:=(k-1)mod n+1
  else j:=n-((k-1)mod n+1)+1;
  a[i,j]:=b[k];{запишем элемент из массива в матрицу}
 end;
writeln('Полученная матрица');
for i:=1 to m do
 begin
  for j:=1 to n do
  write(a[i,j]:4);
  writeln;
 end;
end.

@deagle1 · 31.12.2015, 14:07 **[ТС]**

Спасибо большое, выручили!

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@deagle1 0 / 0 / 0 Регистрация: 30.12.2015 Сообщений: 6
	31.12.2015, 13:30 [ТС]
	То есть я ввожу числа с клавиатуры, а потом строится массив. Мне бы хотя бы разобраться сперва с построением сверху вниз по строкам, потом думаю и снизу вверх получится сделать. Я просто привел часть кода, которая должна отвечать как раз за построение змейкой. 0

@deagle1 0 / 0 / 0 Регистрация: 30.12.2015 Сообщений: 6
	31.12.2015, 14:07 [ТС]
	Спасибо большое, выручили! 0