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

Скажите . сколько кб составляет сообщение содержащее 12.288 битов ?

👇
Ответ:
lobodapo
lobodapo
03.09.2021

1 бит = 8 байт

1 кбайт = 1024  

12288 / 8 = 1536 байт

1536 / 1024 = 1,5 кбайт

4,5(45 оценок)
Открыть все ответы
Ответ:
NikitaBossTV
NikitaBossTV
03.09.2021

код на C++:

#include <iostream>

using namespace std;

int main()

{

   const short R = 3;

   const short C = 3;

   long long int A[R][C];

   for (int i = 0; i < C; i++)

   {

       for (int j = 0; j < R; j++)

       {

           cin >> A[i][j];

       };

   };

   

   short result = 0;

   for (int i = 0; i < C; i++)

   {

       for (int j = 0; j < R; j++)

       {

           if (A[i][j] == 0)

           {

               result++;

           };

       };

   

   };

   cout << result << endl;

   return 0;

}

Объяснение:

Я не понял, что значит A(3,3), но я посчитаю это двумерным массивом 3 на 3. Делаем вложенный цикл и там сравниваем массив с индексами i и j с 0, и если да, то увеличиваем result на 1, а если нет, то ничего

4,6(49 оценок)
Ответ:
Марс2014
Марс2014
03.09.2021
Задача, аналогичная той, которую публиковали вчера. Только цикл repeat заменяем на while.

Сначала немного математики.
\displaystyle a_n= \frac{n!}{(2n)!}=\frac{\prod_{i=1}^ni}{\prod_{i=1}^{2n}i}=\frac{\prod_{i=1}^ni}{\prod_{i=1}^{n}i\times\prod_{i=n+1}^{2n}i}=\frac{1}{\prod_{i=n+1}^{2n}i}; \quad n\in\mathbb N
О модуле тут смысла нет говорить, поскольку все an - суть положительные величины на интервале (0;1).

uses Crt;

function ai(n:integer):real;
var
  i:integer;
  p:real;
begin
  p:=1;
  for i:=n+1 to 2*n do p:=p*i;
  ai:=1/p
end;

var
  i:integer;
  eps,s,an:real;
begin
  ClrScr;
  Write('eps='); Read(eps);
  s:=0; i:=1; an:=eps+1;
  while an>=eps do begin
     an:=ai(i);
     if an>=eps then begin s:=s+an; Inc(i) end
  end;
  Writeln('s=',s);
  ReadKey
end.

Тестовые решения:
eps=0.07
s= 5.8333333333E-01

eps=0.000001
s= 5.9229647667E-01

eps=1e-8
s= 5.9229653448E-01

Для контроля результата можно отметить, что сумма первых 1000 членов ряда равна приблизительно 5.922965365Е-01

Если раздражает наличие функции, можно и без нее:
uses Crt;

var
  i,j:integer;
  eps,s,an,p:real;
begin
  ClrScr;
  Write('eps='); Read(eps);
  s:=0; i:=1; an:=eps+1;
  while an>=eps do begin
    p:=1;
    for j:=i+1 to 2*i do p:=p*j;
    an:=1/p;
    if an>=eps then begin s:=s+an; Inc(i) end
  end;
  Writeln('s=',s);
  ReadKey
end.
4,4(84 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ