Ответ под номером 2.
Обьясняю:( -4+8 Нц: (-1-3-2-5+4+6)*4 кц)=0
Фирштейн ? Или дополнить?
1*1024*1024*8 = 8388608 бит - объём видеопамяти.
По формуле,
Iп=x*y*i
8388608=1920*1080*x
x=8388608:1920:1080
x = ~4,05 = 4 бита - глубина цвета, а значит,
2^4 = 16 различных цветов - максимально можно использовать.
Var
<span>R:real;
</span><span>Begin
</span><span>Write('R = ');ReadLn(R);
</span><span>WriteLn('L = ',2*Pi*R);
</span><span>WriteLn('S = ',Pi*R*R)
</span><span>End.
</span>
Ответ:
Объяснение:Выдели текст который написал нажми ПКМ и сделать гиперссылку и туда вставь ссылку и потом сохрани
Var a:array [1..10] of integer;
begin
for i:1 to 10 do
a[i]:=random(20);
max1:=-maxint;
max2:=-maxint;
imax1:=0;
imax2:=0;
for i:=1 to 10 do
if a[i]>max1 then begin max1:=a[i]; imax1:=i; end;
for i:=1 to 10 do
if (a[i]>max2) and (a[i]<max1) then begin max2:=a[i]; imax2:=i; end;
writeln('Максимум A[',imax1,'] = ', max1);
writeln('Второй максимум A[',imax2,'] = ', max2)
end.