• Помогите с программой в паскале с помощью процедуры
    Процедура выводит N целых случайных чисел с интервала a, b

Ответы 6

  • спасибо большое! а не можете объяснить это:(b-a+1)+a
  • Функция Random(k) в языке Паскаль возвращает целочисленное случайное число из диапазона [0..k-1]. У нас диапазон [a,b], содержащий b-a+1 целых значений, поэтому для получения k приходится писать такое выражение. А чтобы "сдвинуть" полученное число от 0 к а, мы добавляем +а
  • Подправил ответ, там лишнее i было в var
  • спасибо большое Вам!
    • Автор:

      kiana
    • 6 лет назад
    • 0
  • Пожалуйста!
  • procedure RND(a,b,n:integer);var  i:integer;begin  Randomize;  for i:=1 to n do Write(Random(b-a+1)+a,' ')end;var  a,b,n:integer;begin  Write('Задайте интервал для генерирования чисел ');  Read(a,b);  Write('Укажите количество случайных чисел: '); Read(n);  RND(a,b,n)end.Тестовое решение:Задайте интервал для генерирования чисел -5 10Укажите количество случайных чисел: 30-4 1 4 -1 3 -4 9 1 5 -1 -1 9 1 -2 -5 -2 1 -2 2 -3 2 -4 7 10 -3 3 10 5 6 -1
    • Автор:

      cervantes
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years