Дан целочисленный массив из 40 элементов элементы массива могут принимать целые значения...

Question

Дан целочисленный массив из 40 элементов элементы массива могут принимать целые значения от 1 до 10000 включительно. Опишите на естественном или на одном из языков программирования алгоритм, позволяющий найти и вывести наименьший из элементов массива, шестнадцатеричная запись которого содержит ровно две цифры. Если таких чисел нет, то нужно вывести ответ 0.

Answer 1

Var min,i:integer;
a:array[1..40]of integer;
begin
min:=10001;
writeln('Введите значения элементов массива');
for i:=1 to 40 do begin
readln(a[i]);
if (a[i] div 16 >9) and (a[i] div 16 < 99) and (a[i]end;
if (min<>10001) then writeln('Минимальное значение:',min) else writeln(0);
end.

Comments

Спасибо большое!