М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
GraniteScience
GraniteScience
23.10.2021 02:17 •  Информатика

Информационный объем статьи , набранной на компьютере , составляет 30 кбайт . определите сколько страниц содежит статья , если известно , что на каждой странице 32 строки , в каждой строке 48 символов и каждый символ кодируется 16 битами ( кодировки unicode) . варианты ответов 1)8 , 2)10 , 3)12 , 4)15 . с полным решением . заранее

👇
Ответ:
NetBPeMeHu
NetBPeMeHu
23.10.2021
N=30 кб; m=32 строки; n=48 символов; 16 бит=2байта
32*48*16*x=30 ;
24576/1024*8 * x =30;
10x=30
x=10
ответ 2) 10 страниц
4,7(83 оценок)
Открыть все ответы
Ответ:
hamsterizumkin
hamsterizumkin
23.10.2021
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
  var lvl:=0;
  var s:= '';
  var predE:=false;
  foreach var c in s do
    if c='E' then begin
      if predE then begin predE:=false; lvl+=1 end
      else predE:=true
      end
    else
      if c='B' then begin predE:=false; lvl+=1 end;
  Writeln(lvl,' level')
end.

Результат выполнения программы
63 level

И второй вариант, "как не учат в школе":

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
  var s:= '';
  Writeln(Regex.Matches(s,'E[EB]|B').Count,' Level')
end.

Результат выполнения аналогичный.
4,7(99 оценок)
Ответ:
milanakpoplove
milanakpoplove
23.10.2021
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
  var lvl:=0;
  var s:= '';
  var predE:=false;
  foreach var c in s do
    if c='E' then begin
      if predE then begin predE:=false; lvl+=1 end
      else predE:=true
      end
    else
      if c='B' then begin predE:=false; lvl+=1 end;
  Writeln(lvl,' level')
end.

Результат выполнения программы
63 level

И второй вариант, "как не учат в школе":

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
  var s:= '';
  Writeln(Regex.Matches(s,'E[EB]|B').Count,' Level')
end.

Результат выполнения аналогичный.
4,6(73 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ