1.
x=-3 y=-2
x<0 (да)
x<y (да)
x=x+1
y=y/2
x=-2 y=-1
x<0 (да)
x<y (да)
x=x+1
y=y/2
x=-1 y=-0,5
x<0 (да)
x<y (да)
x=x+1
y=y/2
x=0 y=-0,25
x<0 (нет)
x=x-5
y=y+3
x=-5 y=2,75
2.
x=-1 y=4
x<0 (да)
x<y (да)
x=x+1
y=y/2
x=0 y=2
x<0 (нет)
x=x-5
y=y+3
x=-5 y=5
1Мбайт=2^23 бит
32 бита = 2^5 бит
2^18- кол-во пикселей на изображение
<span>3*2^10*2^8=3*2^18 - на экране
</span>изображение займет 1\3 экрана
Ответ: 1\3 1Мбайт=2^23 бит
32 бита = 2^5 бит
Принтер, так как все остальные устройства вводят информацию в пк
Var a:array [1..12] of integer;
<span>i,sum:integer; </span>
<span>begin </span>
<span>sum:=0; </span>
<span>randomize; </span>
<span>for i:=1 to 12 do begin </span>
<span>a[i]:=random(10,99); </span>
<span>if a[i] mod 2 =0 then sum:=sum+a[i]; </span>
<span>end; </span>
<span>writeln('Сумма четных чисел массива = ',sum); </span>
<span>end.</span>
If a div 10 ???? нет условия. нужно
if (a div 10)mod 10 <> 0 then....