Паскаль! Помогите пожалуйста! Дан целочисленный массив из 40 элементов. Элементы массива...

0 голосов
95 просмотров

Паскаль! Помогите пожалуйста!
Дан целочисленный массив из 40 элементов. Элементы массива могут принимать целые значения
от 1 до 10000 включительно. Опишите на естественном языке или на одном из языков программирования
алгоритм, позволяющий найти и вывести количество элементов массива, восьмеричная запись которого содержит ровно две цифры, причем первая (старшая) цифра меньше второй (младшей).
сonst N=40;
var a: array [1..N] of integer;
i, j, k: longint;
begin
for i:=1 to N do
readln(a[i]);

end.


Информатика (543 баллов) | 95 просмотров
0

Это задание из ЕГЭ, нужно вместо многоточия вписать фрагмент программы, новые переменные добавлять нельзя

0

В школе только на такой версии и учат

0

Я и написала - в школе, а не в школах. И имела ввиду только свою.

Дан 1 ответ
0 голосов

Делаем переменную count — счётчик
Для наивной реализации, можно проверить что число лежит в диапазоне [0o10; 0o77] или в десятичной [8; 63]
Потом проверить что a[i] mod 8 > a[i] div 8
Если число соответствует всем условиям, увеличиваем счётчик
Потом выводим значение count

(4.7k баллов)