Запишите функцию для получения случайного числа x из промежутка: [0; 15) [0; 15] [-15; 15) [10; 15)
5-9 класс
|
function Random_Range(x, y : Integer) : Integer;
begin
Random_Range := Random(y) - x;
end;
var
i : Integer;
begin
Randomize;
Writeln( Random_Range(0, 15) ); // [0; 15)
Writeln( Random_Range(0, 16) ); //[0; 15]
Writeln( Random_Range(15, 30) ); //[-15; 15)
Writeln( Random_Range(-10, 5) ); //[10; 15)
ReadLn;
end.
Другие вопросы из категории
1. Наглядный способ представления числовых данных. 9 букв
2. рисунки, схемы, диаграммы позволяют представлять информацию......
3. Позволяет представить, как устроены окружающие объекты и как они связаны с друг другом. 8 букв
4. Помогает читателю очень быстро понять, о чём идёт речь, и создать в его представлении определённый образ. 11 букв
5. Любое словесное высказывание, напечатанное, написанное или существующее в устной форме. 5 букв
7. Диаграмма, данные на которые изображаются в виде секторов круга. 8 букв
8. Форма представления однотипных данных. 7 букв
9. Диаграмма, данные на которой изображаются в виде вертикальных прямоугольников. 10 букв
А28. Инфознайка решил сделать upgrade своего компьютера – заменить материнскую плату. Какое из следующих устройств должен заменить Инфознайка в своем компьютере?
1) Написать программу с циклом.
Дана переменная "n", написать программу где все значения "n" будут суммироваться пока n не будет равно 1
2) Написать программу с циклом.
Дана переменная e, нужно выводить "e" в квадрат до тех пор пока "e" не будет равно 100
--------------
program test;
var..
begin
Читайте также
[0;15)
[0;15]
[-15; 15]
[10;20)
[50;100)
[-35; 65)
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.