В массиве из 10 элементов найти минимальное число, оканчивающееся на 7. ​

зайка584 зайка584    1   14.12.2020 17:30    0

Ответы
TPROfesorT TPROfesorT  13.01.2021 17:31

begin

*ввод массива*

min=-32767;

for i=1 to 10 do

begin

if (mas[i]<min) and (mas[i] mod 10 = 7) then min:=mas[i];

end;

if (min=-32767) then writeln('Ни одно число не кончается на 7')

else writeln(min);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика