ПОЖАЛУЙСТА
Нужна программа на языке Паскаль
Дано число,удалить из него все нечетные числа(желательно с обьяснием)

А вот потом удалить (обнулить) тут допытать надо. А затем снова сформировать число. Как вам такой порядок?

А так, я бы это не принял. К тому же стиль текста программы ещё хуже чем у меня :()

его можно разложить по цифрам, забить в массив, добавить проверку из этой проги, потом опять разбить и вывести как число

Я об этом же. Добавьте анализ. а ЗАТЕМ СБОРКУ ЧИСЛА.

А так. Пусть вопрошающий пошарит хотя бы в здешнем архиве. Задачи на разложение числа на цифры тут встречались неоднократно. Организует запись чисел в массив, затем его обработку. Ну и соберёт потом складывая оставшиеся цифры в массиве умноженные на соответствующим вес разряда (1, 10, 100 ....) Точнее 10^0, 10^1, 10^2 и т.д.

uses crt;const n=15;var a : array [1..99] of integer;i:integer;begin writeln('исходный массив:');for i:=1 to n do //заполнение массива случайными числами begin a[i]:=random(71)-15;write(a[i],' ');end;writeln;writeln('отсортированный массив:');for i:=1 to n do begin // Проверка на чётность if a[i] mod 2=0 then write(a[i],' ');end;end.