Сист по нужно для начала работы с устройством
сначала нужно узнать размер 640*480*3=921600байт, переведем теперь в биты 921600*8=7372800 теперь делим и получаем секунды 7372800/28 800=256сек
Int main(){
for(i=0;i<10;i++)
{mass[i]=rand();}
min=mass[i];
max=mass[i];
for(i=0;i<10;i++)
{if(maxmass[i]) {min=mass[i]; mass[i]=-1;}
}
}
<em>// PascalABC.NET 3.3, сборка 1627 от 27.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger;
var a:=ReadArrReal(n);
var si:=a.IndexesOf(t->t=0);
if si.Count<2 then Writeln(0)
else Writeln(a[si.First+1:si.Last].Sum:0:3)
end.
<u>Примеры</u>
8
-4.6 3.9 0 2.4 1.7 0 0 2.1
4.100
5
0 0.244 -3.253 0 2.34
-3.009