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

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

Question

Информатика

Алексиянна

1 августа, 03:57

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

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

+3

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