1 байт = 8 бит
1Кб = 1024 байт
Странное задание. Логики не поддается
1)Перевести в килобайты:
• 1024 байт = 1 Кб
• 210 байт = 210 / 1024 = 0,205 Кб
• 213 байт = 213/1024 = 0,208 Кб
• 216 байт = 216/1024 = 0,211 Кб
• 213 бит = 213/8 = 26,625 байт / 1024 = 0,026 Кб
• 216 бит = 216/8 = 27 байт / 1024 = 0,0264 Кб
• 0,25 байт = 0,25/1024 = 0,000244 Кб
2) Расположить величины в порядке возрастания
10 бит, 2 байта, 20 бит, 1010 байт, 1 Кбайт
Задача на повторение темы “Круги Эйлера”
Музык состоит из частей представленных на рисунке - 1,4,5,7
Худ - 2,5,7,6
Спорт - 3,4,7,6
Известно что всего 24 учеников
музыкальную школу посещают 10 человек, значит части 1+4+5+7 = 10
художественную школу - 8 человек, части 2+5+7+6 = 8
спортивную школу - 12 человек, 3+4+7+6 = 12
музыкальную и художественную школу- 3, части 5+7 = 3
художественную и спортивную школу - 2, части 7+6 = 2
музыкальную и спортивную школу - 2, части 4+7 = 2
все три школы посещает 1 человек. часть 7 = 1
т.к. часть 7 = 1, то часть 4 = 1 (2-1), часть 6 = 1 часть 5 = 2
из этого следует (в скобках количество детей)
музыкальную школу посещают 10 человек, значит части 1+4 (1)+5 (2)+7 (1) = 10 значит часть 1 = 10-1-2-1 = 6
художественную школу - 8 человек, части 2+5 (2)+7(1)+6(1) = 8 значит часть 2 = 8-2-1-1=4
спортивную школу - 12 человек, 3+4(1)+7(1)+6(1) = 12 , значит часть 3 = 12-1-1-1 = 9
Всего занято детей = части 1+2+3+4+5+6+7 = 6+4+9+1+2+1+1 = 24
Сколько учеников посещают только одну школу?
Только по одной школе посещают (части 1+2+3) = 6+4+9 = 19 чел
Сколько учащихся ни в чем себя не развивают? Все заняты
Обязательно нарисовать круги, в каждой области указать количество человек.
type matrix = array [1..8] of integer;var F, output: text; i, n, cc, sum: integer; c: char; x: matrix; ma: real;
procedure convert (var c: char; var cc: integer);begin if c='1' then cc:=1; if c='2' then cc:=2; if c='3' then cc:=3; if c='4' then cc:=4; if c='5' then cc:=5; if c='6' then cc:=6; if c='7' then cc:=7; if c='8' then cc:=8; if c='9' then cc:=9; if c='0' then cc:=0;end;
procedure sorting (n: integer; x: matrix);begin for n:=1 to 7 do begin if x[n]>x[n+1] then swap(x[n],x[n+1]); end;end;
begin Assign(F, '1.txt'); Reset(F); for i:=1 to 8 do begin read(F, c); convert(c,cc); x[i]:=cc; end; Close(F);
sorting(n,x); sum:=x[1]+x[2]+x[3]+x[4]+x[5]+x[6]+x[7]+x[8]; ma:=sum/8; Assign(output, 'output.txt'); rewrite(output); writeln(output, sum); writeln(output, ma); Close(output);end.