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

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

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

Question

Информатика

Генаша

2 июля, 14:39

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

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

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

+2

Ответы (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. Заполнить массив случайными только отрицательными числами