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

Задан двумерный массив.

1. Заполнить массив случайными только отрицательными числами

Question

Информатика

Генаша

27 мая, 23:37

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

Задан двумерный массив.

1. Заполнить массив случайными только отрицательными числами

+3

Ответы (1)

Знаете ответ на вопрос?

Юрася · Answer 1

Const N=3;

M=3;

var X:array [1 ... N, 1 ... M] of integer;

I, J:integer;

begin

randomize;

for i:=1 to N do

for j:=1 to M do

x [I, J]:=Random (100) - 100;

for i:=1 to N do

begin

for j:=1 to M do

write (' ', x[I, J]) ;

writeln

end;

readln

end.

Разработка в среде Turbo Pascal программы заполнения двумерного массива.Задан двумерный массив.1. Заполнить массив случайными только отрицательными числами

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

Задан двумерный массив.

1. Заполнить массив случайными только отрицательными числами