Генератор случайных чисел выдает случайное натуральное число. Ограничение диапазона указывается в скобках после команды random. Так например если необходимо сгенерировать числа в диапазоне [5;15] команду следует прописать так: amass[i] : = random(11) + 5. Тогда если генерируется число 0 к нему прибавляется 5 получается нижняя граница диапазона, если же 10 + 5, получается 15 - верхняя граница диапазона. Как необходимо прописать команду чтобы генерировались числа в диапазоне [-10;15]?
BobbyFresnel:
А если у Вас PascalABC.NET, забудьте все эти нелепые расчеты, и просто пишите Random(-10, 15)
Ответы
Ответ дал:
0
amass[i] : = random(26) - 10.
Тогда, если генерируется число 0, из него вычитается 10 и получается нижняя граница диапазона, если же 25 - 10, получается 15 - верхняя граница диапазона.
i := integer;
BEGIN
for i := 15 to 1 do readln(mass[i]);
max := mass[ 0 ];
for i := 1 to 15 do
if mass > max then max := mass[i];
for i := 1 to 15 do
if (mass[i] mod 2 = 0) then mass[i] := max;
for i := 1 to 15 do write (mass[i], ‘ ‘);
END.
ввод с клавиатуры
for i:=1 to N do read(amass[i]);
ввод массива случайным образом
randomize; {генератор случайных чисел}
for i:=1 to N do amass[i]:=random(10); {элементу присваиваем случайное целое
в диапазоне 0 до 9 включительно}
Вас заинтересует
5 месяцев назад
5 месяцев назад
6 месяцев назад
6 месяцев назад
2 года назад
7 лет назад