Найти в какой палитре выполнено изображение размером 1000 х 1000 точек объемом 3906,25 кб

Question

Информатика: Найти в какой палитре выполнено изображение размером 1000 х 1000 точек объемом 3906,25 кб

Азрет2002 · Accepted Answer

// PascalABC.NET 3.1, сборка 1219 от 16.04.2016 begin   var a:=ReadLines( m17.txt ).JoinIntoString.ToIntegers;   a.Println;   var b:=a.Select((x,i)- Rec(x,i)).Where(x- x.Item1 0)     .Select(x- x.Item2).ToArray;   if b.Count 2 then     Writeln( Количество отрицательных элементов не равно двум )   else begin     a:=SeqFill(b[0],0).Concat(a.Skip(b[0]).Take(b[1]-b[0]+1))       .Concat(SeqFill(a.Length-b[1]-1,0)).ToArray;     a.Println     end end. Тестовое решение: 23 14 7 15 0 13 -6 41 18 13 8 42...

MOGZ ответил