Введите одномерный массив y = {2.5, 4.9, 10.2, #7.12, 3.1, #2, 6}. Сформируйте из него новый массив z, элементами которого будут являться положитель&

ные элементы массива y, и упорядочите по возрастанию массив z. Решите и объясните Паскаль (лазурус)

Rem BASIC-256
cls
errors = 0
print "Введите текст > ";

rem Пользователь вводит текст
input a$

rem Перебираем все буквы с начала и до предпоследней
for i=1 to length(a$)-1

rem Если встречаем букву Ч или Щ
if mid(a$, i, 1) = "ч" or mid(a$, i, 1) = "щ" then

rem Тогда проверяем следующую за ней букву.
rem Если это буква я, тогда подсчитываем очередную ошибку
if mid(a$, i + 1, 1) = "я" then errors = errors + 1
end if

rem Переходим к следующей букве
next i

rem Вывод результата
print "Количество ошибок в тексте ";
print errors

rem Конец программы
end

Будем рассматривать восьмеричное число как набор двоичных триад
8) Наименьшее четырехзначное восьмеричное число - это 1000₈.
1000₈ = 1 000 000 000₂, но у нас нулей может быть только три, поэтому оставляем самые левые нули, чтобы число оставалось минимально возможным: 1 000 111 111₂ = 1077₈
9) Наибольшее четырехзначное восьмеричное число - это
7777₈ = 111 111 111 111₂, но у нас только четыре единицы и мы оставим их слева, чтобы число оставалось максимальным:
111 100 000 000₂ = 7400₈
10)Наибольшее четырехзначное восьмеричное число - это
7777₈ = 111 111 111 111₂, но у нас только четыре нуля и мы запишем их справа, чтобы число оставалось максимальным:
111 111 110 000₂ = 7760₈