Напишите программу , которая в последовательности 10-ти натуральных чисел определяет максимально число, оканчивающееся на 4. если таких чисел нет , вывести (no). (язык программирования -паскаль)
Program primer;var n,i,max,z:integer;begin max:=0; for i:=1 to 10 do begin read(n); if(n mod 10 = 4) then begin inc(z); if(max<n) then max:=n; end; end; if(z>0) then writeln(max) else writeln('NO');end.
