Закодируем 348 городов числовыми кодами от 0 до 347. Тогда необходимое для кодирования число бит определится представлением числа 347 в двоичной системе счисления.
347(10)=101011011(2), т.е. для записи такого числа потребуется двоичных разрядов или просто 9 бит.
Когда будет накоплена информация о 184 городах, она займет 184х9=1656 бит. В одном байте 8 бит, поэтому для перехода к байтам делим полученное значение на 8. 1656/8=207 (байт).
Ответ: 3) 207 байт.
Uses crt;
var a,b,c,s,k : integer;
begin
writeln('Введите 3 числа :');
readln(a,b,c);
if a > 0 then
begin
k:= k + 1;
s:= a;
end;
if b > 0 then
begin
k:= k + 1;
s:= s + b;
end;
if c > 0 then
begin
k:= k + 1;
s:= s + c;
end;
writeln('Сумма чисел = ' , s);
writeln('Количество положительных чисел = ', k);
end.
Крайне часто на глаза стала попадаться именно эта загадка.
Колонка <em>(а собака - болонка)</em>
По сути необходимо выбрать две позиции для красных гирлянд (пара чисел без учёта порядка). Такой выбор осуществляется С²₅ = 10
Программа:
1)
var i: integer;
begin
for i:=1 to 1000 div (3*5) do
write(i*3*5,' ');
end.
Результат:
15 30 45 60 75 90 105 120 135 150 165 180 195 210 225 240 255 270 285 300 315 330 345 360 375 390 405 420 435 450 465 480 495 510 525 540 555 570 585 600 615 630 645 660 675 690 705 720 735 750 765 780 795 810 825 840 855 870 885 900 915 930 945 960 975 990
Программа:
2)
var n,i,j: integer;
begin
readln(n);
for i:=1 to n do
begin
for j:=1 to 10 do write(j,' ');
writeln;
end;
end.
Пример:
5
1 2 3 4 5 6 7 8 9 10
1 2 3 4 5 6 7 8 9 10
1 2 3 4 5 6 7 8 9 10
1 2 3 4 5 6 7 8 9 10
1 2 3 4 5 6 7 8 9 10