Помогите, пожалуйста! Как ввести числа с клавиатуры в диапазоне от -30000 до 30000?Паскаль

а почему number равняется -100000?

можно инициализировать любым числом вне диапазона

извините, но можно еще вопрос: Как ввести числа в этом диапазоне, но есть имеет определенное количество чисел ,например n

тогда вместо repeat ..until используйте for i:=1 to n do

number:=-100000;repeat writeln('введите число в диапазоне от -30000 до +30000');  readln(number);until (number in [-30000..30000]);