Программа паскаль. Ограничение.

Написал программу которая упорядочивает элементы массива по убыванию.
Пользователь сам вводит числа. Нужно сделать чтобы если при вводе вместо цифры введут букву, то он запрашивает снова ввести число.
program sort;
uses crt;

const n=9;
var a : array[1..n] of integer;
i,j,buf,nmin:integer;
begin
clrscr;

write('vvedite');
for i := 1 to n do read(a[i]);

for i:=1 to n-1 do
begin
nmin:=i;
for j:=i+1 to n do
if a[j]>a[nmin] then nmin:=j;
buf :=a[i];
a[i]:=a[nmin];
a[i]:=buf;
end;
writeln('rez');
for i:=1 to n do write(a[i]);
end.

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.