Основы программирования на языке Turbo Pascal. Беляева И.В. - 64 стр.

UptoLike

Составители:

Рубрика:

{Генерация значений n и m}

n := random(10) + 1; {Генерируется значение в интервале}

m := random(10) + 1; {от 1 до 10}

{Генерация случайного массива}

for i := 1 to n do

for j := 1 to m do

a[i,j] := random(5) + 1; {Генерация по очереди

всех элементов массива}

…

Ввод/вывод массива

Задача 6: Ввод массива с клавиатуры.

Фрагмент программы:

…

{Ввод количества используемых строк и столбцов}

read(n, m);

{Прочитать по очереди все элементы массива}

for i := 1 to N do

for j := 1 to M do

read(a[i,j]);

…

Задача 7: Вывод массива на экран дисплея.

Двухмерный массив должен быть выведен в виде таблицы, имеющей N

строк и M столбцов. Поэтому все элементы строки выводятся друг за

другом через пробел. После окончания вывода строки производится

переход на следующую строку.

Фрагмент программы:

…

for i := 1 to n do {Для всех строк}

begin

for j := 1 to m do {Выводятся все элементы строки}