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

Хабарламада 10 символ бар. Оны жазу үшін 64 символдық алфавит қолданылды. Хабарламаның ақпараттық көлемін бит өлшем бірлігінде анықта. Ұсынылған Нұсқалардың ішінен дұрыс жауапты таңда : 60 бит
32 бит
40 бит
8 бит
100 бит.
Хабарлама қуаты 8 символға тең алфавит көмегімен жазылған. Хабарламаның ақпараттық салмағы 120 битті құрайды. Осы хабарламадағы символдардың санын анықта :
8 символ
120 символ
40 символ
16 символ
15 символ ​


Хабарламада 10 символ бар. Оны жазу үшін 64 символдық алфавит қолданылды. Хабарламаның ақпараттық кө

👇
Ответ:
smirnovar2016
smirnovar2016
16.02.2020

2 суракта кайсы дурыс тезирек керек

Объяснение:

4,6(85 оценок)
Открыть все ответы
Ответ:
сонька177
сонька177
16.02.2020
{ ответ дан на языке Pascal }
{         Вариант a         }
PROGRAM Solution(INPUT, OUTPUT);

VAR
  Str: STRING;
  Str1: STRING;
  Str2: STRING;
  Str3: STRING;
  TempStr: STRING;

BEGIN
  WRITE('Введите строку: ');
  READLN(Str);
  Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
  Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
  Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));

  WRITELN(Str2 + Str3 + Str1);

END.

{         Вариант b         }
PROGRAM Solution(INPUT, OUTPUT);

VAR
  Str: STRING;
  Str1: STRING;
  Str2: STRING;
  Str3: STRING;
  TempStr: STRING;

BEGIN
  WRITE('Введите строку: ');
  READLN(Str);
  Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
  Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
  Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));

  WRITELN(Str3 + Str1 + Str2);

END.
4,5(42 оценок)
Ответ:
arsenijcurikov
arsenijcurikov
16.02.2020
PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('Количество строк/столбцов в матрице:');
  Writeln('*** Исходная матрица ***');
  var a:=MatrRandom(n,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var k:=Range(0,n-1).Select(i->a[i,i]).ToArray.IndexMin;
  Swap(a[0,0],a[k,k]);
  Writeln('*** Результат ***');
  a.Println(4)
end.

Пример
Количество строк/столбцов в матрице: 5
*** Исходная матрица ***
 -54   0  45  24  72
 -90  46  54  46  50
 -51  85 -76 -64 -27
 -14 -33 -66   2  71
  43 -92  77  58 -22

*** Результат ***
 -76   0  45  24  72
 -90  46  54  46  50
 -51  85 -54 -64 -27
 -14 -33 -66   2  71
  43 -92  77  58 -22
4,4(63 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ