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

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

Question

Информатика

Мухсин

16 июня, 19:10

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

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

+1

Ответы (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.