Const
LoBound = -30;
HiBound = 50;
...
begin
...
for i:=0 to N do
Ar := LoBound+Random(HiBound-LoBound+1);
...
end;
...
Pascal
Как задать элементы матрицы случайным образом в дапазоне от -30 до 50?
Цитата:
Originally posted by gunner1986
Как задать элементы матрицы случайным образом в дапазоне от -30 до 50?
Как задать элементы матрицы случайным образом в дапазоне от -30 до 50?
Код:
Цитата:
Originally posted by Sagittarius
Код:
Const
LoBound = -30;
HiBound = 50;
...
begin
...
RANDOMIZE;
for i:=0 to N do
Ar := LoBound + RANDOM(HiBound-LoBound+1);
...
end;
...
LoBound = -30;
HiBound = 50;
...
begin
...
RANDOMIZE;
for i:=0 to N do
Ar := LoBound + RANDOM(HiBound-LoBound+1);
...
end;
...