Var a:array[1..8] of integer;i:integer;beginrandomize;for i:=1 to 8 do begin a[i]:=random(20-10) + 10; write(a[i],' '); end; writeln;for i:=1 to 8 do begin if (a[i] < 15 ) then a[i]:=2*a[i]; write(a[i],' '); end;
<span>end.</span>
Ответ:
Нажатием клавиши "3" на клавиатуре
Объяснение:
этот блок отвечает за нажатие определенной клавиши на клавиатуре (самый верхний блок)
143.
Дано i=24
x*y=1024*768 I=x*y*i=18874368бит=2.25Мбайт
N=16777216=2^24
144.
i=24
x*y=1600*1200
I=1600*1200*24=46080000бит~~~5.5Мбайт Можно купить 512мбайт и 64мбайт