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

Даны три числа . выведете те из них которые принадлежат отрезку [-1; 3] pascal

👇
Ответ:
Gakaka
Gakaka
14.05.2020
Var a,b,c:real;
begin
  writeln('Введите a,b,c');
  readln(a,b,c);
  if (a<=3) and (a>=-1) then writeln(a, ' принадлежит промежутку [-1,3]');
  if (b<=3) and (b>=-1) then writeln(b, ' принадлежит промежутку [-1,3]');
  if (c<=3) and (c>=-1) then writeln(c, ' принадлежит промежутку [-1,3]');
end.
4,5(100 оценок)
Открыть все ответы
Ответ:
FarLime
FarLime
14.05.2020

Объяснение:

Допустим, у нас есть сообщение «habr», которое необходимо передать без ошибок. Для этого сначала нужно наше сообщение закодировать при Кода Хэмминга. Нам необходимо представить его в бинарном виде.На этом этапе стоит определиться с, так называемой, длиной информационного слова, то есть длиной строки из нулей и единиц, которые мы будем кодировать. Допустим, у нас длина слова будет равна 16. Таким образом, нам необходимо разделить наше исходное сообщение («habr») на блоки по 16 бит, которые мы будем потом кодировать отдельно друг от друга. Так как один символ занимает в памяти 8 бит, то в одно кодируемое слово помещается ровно два ASCII символа. Итак, мы получили две бинарные строки по 16 битбит. распараллеливается, и две части сообщения («ha» и «br») кодируются независимо друг от друга. Рассмотрим, как это делается на примере первой части.

Прежде всего, необходимо вставить контрольные биты. Они вставляются в строго определённых местах — это позиции с номерами, равными степеням двойки. В нашем случае (при длине информационного слова в 16 бит) это будут позиции 1, 2, 4, 8, 16. Соответственно, у нас получилось 5 контрольных бит (выделены красным цветом)Таким образом, длина всего сообщения увеличилась на 5 бит. До вычисления самих контрольных бит, мы присвоили им значение «0».

4,8(69 оценок)
Ответ:
rrxxmarta
rrxxmarta
14.05.2020
uses crt;
var a, b, c, n, i, j :integer;   
s :array [1..10000] of integer;
begin
   clrscr;
   writeln ('Vvedite razmer masiva');
   read (n);
   writeln  ('Vvedite chislo X');
   read (a);
   for i:=1 to n do 
   begin 
      writeln ('Vvedit s[', i, '] element'); 
      read (s[i]); 
   end;
   for i:=1 to n do 
      for j:=1 to n-1 do 
         if s[j]<s[j+1] then   
         begin   
            b:=s[j];   
            s[j]:=s[j+1];   
            s[j+1]:=b;   
         end;
   for i:=1 to n do 
   begin 
      write (s[i], ' '); 
      if s[i]=a then inc (c); 
   end;
writeln;
if c>0 then writeln ('3adanoe chislo prisytstvyet') else writeln('3adanoe chislo otsytstvyet');
end.

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