Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от - 1000 до 1000 включительно. Опишите алгоритм, позволяющий найти и вывести минимальное значение среди отрицательных элементов массива, оканчивающихся на 3. Если таковых не имеется, вывести сообщение "Не найдено".

Разрешается использовать переменные j и min

Question

Информатика

Бэр

27 января, 22:16

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от - 1000 до 1000 включительно. Опишите алгоритм, позволяющий найти и вывести минимальное значение среди отрицательных элементов массива, оканчивающихся на 3. Если таковых не имеется, вывести сообщение "Не найдено".

Разрешается использовать переменные j и min

+2

Ответы (1)

Знаете ответ?

Кресси · Answer 1

Var j, min: integer;

a: array [1 ... 30] of integer;

begin

min: = 1001;

for j:=1 to 30 do

if (a[j]mod 10=3) and (a[j]min: = a[j]) ;

if min: = 1001

then writeln ('Не найдено')

else writeln (min) ;

end.