Презентация по кубановедению мои земляки в годы ВОВ 2 класс.

да он всё удаляет, ОН ХАКЕР!!!!!
короче в "знаниях+" у меня было 29 ответов, из них 10 лучших. На другой день смотрю "у вас 0 ответов"- я в это время "CUC@"!!!!!!!!!!!!
ЕЩЁ КОРОЧЕ ОН СЫН ХАКЕРА ! в "знаниях+" у него несколько тыс. ответов, несколько мл. спасибо, и все ответы "лучшие" и "проверенные экспертом". скажите, как не подумать что он хакер?
он удаляет это У ВСЕХ. каждый с ним сталкивался, если же нет- ВЫ ВЕЗУНЧИК!!!!!!!!!
ФОТО С ЕГО "ОТВЕТОМ" ИЗ ЗНАНИЯ+ Я ПРЕКРЕПИЛ

Vb.     dim a(5) as integer     dim min as integer = a(0)     for i as integer = 1 to a.length - 1                      if i mod 2 = 0 then                              if a(i) > 0 and a(i) < min then                              min = a(i)                                  end if        '             end if         nextpascal.const n=5; var    a: array[1..n] of byte;     i,imin: byte; begin   writeln('исходный массив: ');     for i: =1 to n do    begin      a[i]: =random(21);       write(a[i],' ');     end;     writeln;     imin: =1;   for i: =2 to n do    begin      if a[i]< a[imin] then imin: =i;         end;   writeln('минимум = ',a[imin]); end.