Какую библиотеку нужно подключать для функции random в Си?

Необходимо вывести числа от - 3 до 7. random (6) ; random (-3,7) ; random (-3) + 7; random (7) - 3.

Program PS; var n, i: integer; b: real; a: array[1 ... 3] of real; otoplenie: boolean; begin read (n) ; for i : = 1 to 3 do a[i] : = random (50) - 20 + random () ;

Program PS; var n, i: integer; b: real; a: array[1 ... 3] of real; begin read (n) ; for i : = 1 to 3 do a[i] : = random (50) - 20 + random () ;

Как сделать теперь без массива (паскале) ? var nm:array of integer; j, l:integer; begin nm: = new integer[3] (random (20), random (20), random (20)) ; writeln ('nm[0] = ', nm[0]) ; writeln ('nm[1] = ', nm[1]) ; writeln ('nm[2] = ', nm[2]) ;

Что не так? (процедура обязательна) procedure random (k:integer) ; var a:array[1 ... 100] of integer; var l:integer; begin for l:=1 to k do begin a[l]:=random (100) ; writeln (a[l]) ; end; end; var v:integer; begin write ('Сколько будет чисел?