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

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

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку