Ответ:
1) 1,5 Кбайт * 1024 = 1536 байт
1536 байт * 8 = 12288 бит
2) 4 Кбайт * 1024 = 4096 байт
4096 байт * 8 = 32768 бит
Объяснение:
1 Кбайт = 1024 байт
1 байт = 8 бит
X=1024*768
x=786432
y=786432*2
y=1572864
bayt=1572864/8
bayt=196608
kbayt=196608/1024
kbayt=192
OTVET=192Kb
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function IsPrime(n:integer):boolean;
begin
if n<4 then Result:=True
else begin
var found:=(n mod 2=0);
var p:=3;
while (not found) and (sqr(p)<=n) do
begin found:=(n mod p=0); p+=2 end;
Result:=not found
end
end;
begin
var a:=ArrRandom(ReadInteger('n='),0,100); a.Println;
var primes:=a.Where(x->IsPrime(x)).ToArray;
primes.Sort;
primes.Println
end.
<u>Пример</u>
n= 17
33 23 56 58 32 2 5 72 68 59 89 30 17 40 44 21 23
2 5 17 23 23 59 89
read(n);
if (n>99) and (n<1000) then writeln('Yes');