Людмила,Василий,Максим,Федор,Федора.
Ответ:
1. 60
2. 65
3.
var i,a,s:Integer;
begin
for i:=1 to 10 do
begin
ReadLn(a);
if a<0 then s:=s+a
end;
Write ('Сумма отрицательных чисел равна ',s)
end.
4.
var i,a,s:Integer;
begin
for i:=1 to 20 do
begin
ReadLn(a);
if (a>0) and (a mod 2 = 0) then s:=s+a
end;
Write ('Сумма положительных чётных чисел равна ',s)
end.
Объяснение:
1.
s=0 n=76
пока s<71 s=s+10 n=n-2
0<71 (да) s=10 n=74
10<71 (да) s=20 n=72
20<71 (да) s=30 n=70
30<71 (да) s=40 n=68
40<71 (да) s=50 n=66
50<71 (да) s=60 n=64
60<71 (да) s=70 n=62
70<71 (да) s=80 n=60
80<71 (нет) s=80 n=60
2.
s=1 k=0
пока k<13 s=s+2*k k=k+4
0<13 (да) s=1 k=4
4<13 (да) s=9 k=8
8<13 (да) s=25 k=12
12<13 (да) s=49 k=16
16<13 (нет) s=49 k=16
s+k=49+16=65
Это можно даже не решать, так как 4 Мбайта это 4096 Кбайт, а 2048 Кбайт это ровно половина он 4 Мбайт, следовательно через это же соединение файл будет передан за половину времени файла равного 4 Мбайтам
16/2=8 за 8 секунд
49,152 бит = 49,152/2^3 байт = 6,144 байт
6,144 байт = 6,144 /2^10 КБ = 0,006 КБ
49,152 бит = 6,144 байт = 0,006 КБ
6КБ = 6*2^10 байт = 6144 байт
6144 байт = 6144 * 2^3 бит = 49152 бит
6КБ = 6144 байт = 49152 бит
8 байт - 64 бита
1.5 кбайт =
1 <span>536 байтов
512 бит = 64 байта
2 мбита = </span>
<span>65 536 кбайт
4 бита = 0.5 байта
3072 кбайт = 3 мбайта . Как я поняла тут мегабайты , байты , биты и килобайты да ?</span>