1. 662 Мб=1024*662 Кбайт=1024*1024*662 байт= <span>1024*1024*8*662 бит=5553258496 бит
2. N=2^i, 256=2^i1, 16=2^i2, i1=8 бит, i2=4 бит.
Объем файла=V=кол-во пикселей*i
V1/V2=i1/i2=2</span>
Без ОС
-- дверной звонок
с ОС
-- автоматический электрочайник
<span>-- термореле
это всё что я знаю!</span>
Рисунки - объекты векторной природы (прямые линии, кривые и т.д.) и изображения (растровые объекты).
1)
Var i:integer;
Begin
for i := 100 to 999 do
if (i mod 15 = 11) and (i mod 11 = 9)
then writeln(i);
End.
2)
Var i,n,s:integer;
Begin
read (n);
s := 1;
for i := 1 to n do
s := s * i;
write(s);
End.
3)
Var i,j,k:integer;
Begin
for i:=1 to 9 do
for j:=0 to 9 do
for k:=0 to 9 do
if i*i*i+j*j*j+k*k*k=i*100+j*10+k
then writeln(i*100+j*10+k);
End.