Помогите пожалуйста с Pascal!!
Организуйте заполнение типизированного файла случайными
целыми числами из интервала [-10;10].
Выведите содержимое файла на экран.
Замените компоненты с нечетными номерами на 1.
Дополнительный массив не использовать.
Выведите на экран измененное содержимое файла.