Документ размером 10Мбайт можно отправить с одного компьютера на другой двумя А. Сжать архиватором, передать архив по каналу связи, распаковать. Б. Передать по каналу связи без использования архиватора.
Какой быстрее и насколько, если: - средняя скорость передачи данных по каналу связи равна 221бит в секунду; - объём сжатого архиватором документа равен 80% от исходного; - время, требуемое на сжатие документа — 12 секунд, на распаковку — 3секунды?
В ответе напиши букву А, если быстрее способ А, или Б, если быстрее Б. Сразу после буквы напиши число, обозначающее, на сколько секунд один быстрее другого.
Так, например, если Б быстрее А на 23 секунды, в ответе нужно написать Б23. Единицы измерения «секунд», «сек.», «с.» к ответу добавлять не нужно.
Если шестеренка с буквами двигается против часовой, а стрелка стоит на месте то буквы будут перечисляться по порядку, от А до Я. Так как главная шестеренка вращает остальные, то вторая будет двигаться по часовой, это значит что начиная с нуля цифры на второй шестеренке будут уменьшаться, 0, 9, 8...1 и по кругу. Далее третья шестеренка будет двигаться против часовой значит цифры будут идти по нарастающей, от 0 до 6. Составим таблицу Таблица в картинках О Л И М П И А Д А = 51 85 12 76 42 12 00 64 00
1) Var n,m,max,min:integer; Begin write('Введите число: '); readln(n); min:=9; max:=0; while n>0 do begin m:=n mod 10; if m<min then min:=m; if m>max then max:=m; n:=n div 10; end; writeln('Максимальное число: ',max); writeln('Минимальное число: ',min); End. 2) var i,count: integer; n,s:string; begin writeln('Введите число: '); readln(s); writeln('Введите цифру: '); readln(n); for i:=1 to length(s) do if(s[i]=n)then count:=count+1; writeln('Количество раз, когда встречается цифра = ',count); end.
Б15
Объяснение:
вот так вот комменты не пишите