Яке слово можна скласти з цих букв в у е н ж т о л о г и с

глист,нож,жгут,нос,вино,сон,логин, голос,нил,луг

ну мне кажется что глист: ))

2)  массив: найти максимальный элемент массива, вывести на экран.   var mas : array of integer;   i ,  n  ,  max : integer; begin   randomize;   writeln('введите n - число элементов одномерного массива ');     readln(n);     setlength(mas,n);     for i : = 1   to n do      mas[i] : = random(100);     max : = mas[1];     for i : = 1 to n do      begin      if max < mas[i] then        max : = mas[i];       end;     for i : = 1   to n do      write(mas[i], ' ');       writeln;       writeln('max = ',max);   readln; end.

//pascalabc.net (версия 3.1, сборка 1210 от 29.03.2016) var   a, s: integer; begin   write('введите число : ');   readln(a);   while a < > 0 do   begin       if a mod 2 = 0 then begin           s : = s + a mod 10;           write(a mod 10);                   a : = a div 10;           if a mod 2 = 0 then write('+') else break       end;       end;   write('=');   writeln(s); end. тестовое решение: введите число : 1784 4+8=12