Помогите, пожалуйста, написать программы!) Заполнить массив из 15 элементов случайным...

0 голосов
25 просмотров

Помогите, пожалуйста, написать программы!)
Заполнить массив из 15 элементов случайным образом:
1. вещественными значениями x (222. вещественными значениями x (03. вещественными значениями x (-504. вещественными значениями, лежащими в диапазоне от 0 до 1


Информатика (184 баллов) | 25 просмотров
0

В Паскаль вызов Random без аргументов возвращает случайное вещественное число на [0;1]. Необходимые диапазона получаются нормированием (если так понятнее - "масштабированием") числа на нужный диапазон. Сначала умножаем на разницу между верхней и нижней границей диапазона, а потом к результату прибавляем нижнюю границу. Так, для [22;23] это будет 1*Random+22 или просто Random+22. Для [0;10] будет 10*Random, для [-50;50] получаем 100*Random-50

Дан 1 ответ
0 голосов
Правильный ответ

Фрагмент программы:
var
  i: integer;
  a: array[1..15] of real;

begin
  for i := 1 to 15 do
    a[i] := Random + 22;
  { Или вместо предыдущей строчки подставьте одну из следующих:
  a[i] := 10 * Random;
  a[i] := 100 * Random - 50;
  a[i] := Random;
  }
   
  {
  Тут все что еще надо
  }
end.

(142k баллов)