delete ---> CATHIARD Pascal
input number: