ответить на вопросы в тетради: 1.Что ты понимаешь под коррекцией изображения? 2.Как ты считаешь, в чем заключается основная цель применения эффектов к изображению? 3.Почему важно качество изображения?
, поэтому для кодирования цвета одного пикселя необходимо отвести 24 бита = 3 байта (в одном байте 8 бит).
В экране 1024 * 768 пикселей, на 1 пиксель отводится 3 байта, значит, на один кадр приходится 1024 * 768 * 3 байт = 768 * 3 Кбайт = 0,75 * 3 Мбайт = 2,25 Мбайт (в одном Кбайте 1024 байта, в одном Мбайте 1024 Кбайта)
Частота смена кадра означает, сколько раз в секунду сменяется кадр. В данном случае в секунду кадр сменяется 76 раз, объём переданной за секунду информации 76 * 2,25 Мбайт = 171 Мбайт
171 Мбайт/с
Объяснение:
В экране 1024 * 768 пикселей, на 1 пиксель отводится 3 байта, значит, на один кадр приходится 1024 * 768 * 3 байт = 768 * 3 Кбайт = 0,75 * 3 Мбайт = 2,25 Мбайт (в одном Кбайте 1024 байта, в одном Мбайте 1024 Кбайта)
Частота смена кадра означает, сколько раз в секунду сменяется кадр. В данном случае в секунду кадр сменяется 76 раз, объём переданной за секунду информации 76 * 2,25 Мбайт = 171 Мбайт
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
Writeln(Range(1,100).Select(i->sin(i)*cos(i)).Where(x->x<>0).Average)
end.
Тестовое решение:
-0.00136006072493969
2. А вот так учат писать это же школьные учителя:
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
var
m:array[1..100] of real;
i,k:integer;
s:real;
begin
s:=0;
k:=0;
for i:=1 to 100 do begin
m[i]:=sin(i)*cos(i);
if m[i]<>0 then begin
s:=s+m[i];
k:=k+1
end
end;
Writeln(s/k)
end.
Тестовое решение:
-0.00136006072493969