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

Напишите для класной работы измерение информации

👇
Ответ:
evakozyreva03
evakozyreva03
29.12.2021

Объяснение:

1 байт = 8 бит

1 килобайт = 1024 байта

1 мегабайт = 1024 килобайт

1 гигабайт = 1024 мегабайт

1 терабайт = 1024 гигабайт

1 петабайт = 1024 терабайт

1 эксабайт = 1024 петабайт

1 зеттабайт = 1024 эксабайт

1 йоттабайт = 1024 зеттабайт

4,5(95 оценок)
Открыть все ответы
Ответ:
sakhnovavaleri1
sakhnovavaleri1
29.12.2021
2. Устройство, выполняющее все арифметические и логические операции и управляющее другими устройствами компьютера, называется:
b. Процессором;

3. Многопроводная линия для информационного обмена между устройствами компьютера называется:
c. Магистралью;

4. Компьютер – это:
d. Многофункциональное устройство для работы с информацией;

5. Магистрально-модульный принцип архитектуры современных персональных компьютеров подразумевает такую логическую организацию его аппаратных компонент, при которой:
c. Каждое устройство связывается с другими через магистраль, включающую в себя шины данных, адреса и управления;

6. Во время использования прикладная программа хранится:
d. В оперативной памяти;

7. При отключении компьютера от сети информация исчезает:
a. Из оперативной памяти;

8. Устройство для подключения компьютера к сети Интернет:
a. Модем;

9. Операционные системы входят в состав:
d. Системного программного обеспечения;

10. Программы обслуживания внешних устройств компьютера называются:
a. Драйверами;
4,6(34 оценок)
Ответ:
сонька177
сонька177
29.12.2021
Var m : array[0..6] of Integer;
  i,k,N : Integer;
Begin
  For i:=0 to 6 do m[i]:=0;
  Readln(N);
  k:=6;
  While N>0 do
  Begin
    If N>=Power(2,k) then
    Begin
      N:=N-Trunc(Power(2,k));
      Inc(m[k]);
    end else Dec(k);
  end;
  For i:=0 to 6 do Writeln(Power(2,i),'  ',m[i],' шт.');
end.

Еще вариант:
Const
  NN = 7;
  money : array[1..7] of Integer = (1,2,4,8,16,32,64);
Var m : array[1..NN] of Integer;
  i,k,N : Integer;
Begin
  For i:=1 to NN do m[i]:=0;
  Readln(N);
  k:=NN;
  While N>0 do
  Begin
    If N>=money[k] then
    Begin
      N:=N-money[k];
      Inc(m[k]);
    end else Dec(k);
  end;
  For i:=1 to NN do Writeln(money[i],'  ',m[i],' шт.');
end.
4,7(42 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ