Вывести на экран N случайных чисел (каждое с новой строки) из диапазона [-21, 35]

var n, i, x: integer;
begin
    randomize(); // датчик случайных чисел 
    n := 7; // сколько чисел выводить
    for i := 1 to n do
    begin
        x := random (35) -21; // из диапазона 
        writeln(x); // печатаем значение
    end;
end.