С клавиатуры вводится некоторое количество положительных чисел.ввод чисел заканчивается при вводе 0.найти сумму тех чиснл восмеричная запись которых содержит ровно четвре знака при чем последний из них не цифра 5

Можно более подробно. Мы так не решаем

Я не могу забраться к Вам в мозг и прочитать там, как именно вы решаете.

Если есть ограничения по языку или приемам решения, алгоритмам, надо указывать их в условии задания.

Решать будем на языке Паскаль.Четырехзначные восьмеричные числа - это числа в диапазоне от 1111₈ до 7777₈Мы можем поступить двояким способом.1) перевести оба числа в десятичную систему счисления и таким образом определить диапазон чисел, которые (предположительно) надо суммировать.2) перевести оба числа в шестнадцатиричную систему и записать диапазон шестнадцатиричными числами (в Паскале их можно указывать).Мне больше по душе второй вариант, потому что он не требует расчетов на калькуляторе или "в столбик".1111₈ = 1 001 001 001₂ = 10 0100 1001₂ = 249₁₆7777₈ = 111 111 111 111₂ = 1111 1111 1111 = FFF₁₆Осталось решить вопрос о том, как отобрать числа, у которых в восьмеричном коде последняя не пятерка. Вспомним перевод числа из десятичной системы в восьмеричную: мы делим на 8, выписывая остатки, в потом записываем из в обратном порядке. Следовательно, последней цифрой числа будет остаток от самого первого деления. И это дает нам правило отбора чисел: остаток от деления числа на 8 не должен равняться 5.PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018Внимание! Если программа не работает, обновите версию!begin  ReadSeqIntegerWhile(t->t<>0)      .Where(t->t.Between($249,$FFF) and (t mod 8 <>5)).Sum.Printlnend.