Задание 7 Параграф 4.3 ГДЗ Босова 8 класс 2025 (Информатика)
Исследуйте работу функции random, запустив многократно на выполнение программу:
var x, y, n: integer;
begin
writeln (‘Исследование функции random’);
write (‘Введите x’); read (x);
write (‘Введите n’); read (n);
y := random (x);
writeln (‘random(‘, x,’)=’, y);
write (‘random(‘, x,’)+’, n, ‘=’, y + n)
end.Как можно получить случайное число из интервала $$(0, x)$$?
Как можно получить случайное число из полуинтервала $$(0, x]$$?
Как можно получить случайное число из интервала $$(n, x+n)$$?
Функция random(k) в Pascal возвращает случайное целое число из полуинтервала $$[0, k)$$, то есть от $$0$$ до $$k-1$$.
Тогда:
- случайное число из интервала $$(0, x)$$ можно получить так: random(x-1)+1;
- случайное число из полуинтервала $$(0, x]$$ можно получить так: random(x)+1;
- случайное число из интервала $$(n, x+n)$$ можно получить так: random(x)+n.
Проверить это можно программой:
var
n, x, i: integer;
begin
read(x, n);
randomize;
for i := 1 to 5 do
write(random(x-1)+1, ‘ ‘);
end.
Ответ: а) random(x-1)+1; б) random(x)+1; в) random(x)+n.
