Создать динамический массив А целых чисел размерностью M на N. Заполнить массив случайными числами в диапазоне [-50;50]

@дядя богдан 2 · Регистрация: 07.10.2018

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

Создать динамический массив А целых чисел размерностью M на N. За-полнить массив случайными числами в диапазоне [-50;50]
Элементы массива, находящиеся в столбцах на нечетных местах.

@ZX Spectrum-128 · 05.04.2019, 09:05

Сообщение от дядя богдан 2

Создать динамический массив А целых чисел размерностью M на N. За-полнить массив случайными числами в диапазоне [-50;50]

Pascal

program project1;
 
uses
  Math,
  SysUtils;
 
var
  a: array of array of integer;
  n, m, i, j: integer;
 
begin
  randomize;
  writeln('Enter size of array: ');
  readln(m, n);
  setlength(a, m, n);
  for i := 0 to m - 1 do
  begin
    for j := 0 to n - 1 do
    begin
      a[i, j] := -50 + random(101);
      Write(a[i, j]: 5);
    end;
    writeln;
  end;
  setlength(a, 0, 0);
  readln;
end.

Сообщение от дядя богдан 2

Элементы массива, находящиеся в столбцах на нечетных местах.

Что с ними делать?

@дядя богдан 2 0 / 0 / 0 Регистрация: 07.10.2018 Сообщений: 60
		1
	Создать динамический массив А целых чисел размерностью M на N. Заполнить массив случайными числами в диапазоне [-50;50] 04.04.2019, 18:54. Показов 3312. Ответов 1 Метки нет (Все метки) Создать динамический массив А целых чисел размерностью M на N. За-полнить массив случайными числами в диапазоне [-50;50] Элементы массива, находящиеся в столбцах на нечетных местах. 0

	05.04.2019, 09:05

Опции темы

Создать динамический массив А целых чисел размерностью M на N. Заполнить массив случайными числами в диапазоне [-50;50]

Решение