Помогите написать программу в паскале. Заполните массив из N элементов случайными числами...

0 голосов

Помогите написать программу в паскале.
Заполните массив из N элементов случайными числами в интервале [1,N] так, чтобы в массив обязательно вошли все числа от 1 до N (постройте случайную перестановку).
Пример:
Массив:
3 2 1 4 5


спросил от (53 баллов) в категории Информатика
1 Ответ
0 голосов
ответил от Доцент (53.1k баллов)
 
Лучший ответ

//PascalABC.NET 3.1 сборка 1200
begin
    Println(
        Range(1, ReadInteger('N ='))
        .ToArray
        .Shuffle
    );
end.

0 голосов
ответил от
## // PascalABC.NET 3.9
var n := ReadInteger;
var a := ArrGen(n, i -> i + 1);     // создать массив и заполнить числами от 1 до n
a.Shuffle;                          // случайная перестановка
a.Println;
{
Пример работы
8
4 7 1 5 8 2 3 6
}
...