Милита1065
?>

В одной из кодировок Unicode каждый символ кодируется 16 битами. Вова написал текст (в нём нет лишних пробелов): «Собака, кошка, курица, корова, лошадь, коза, овца – домашние животные». Затем он добавил в список название ещё одного животного. Заодно он добавил необходимые запятые и пробелы. При этом размер нового предложения в данной кодировке оказался на 18 байт больше, чем размер исходного предложения. Напишите в ответе длину добавленного названия животного в символах

Информатика

Ответы

kirillprotopopov1

===== PascalABC.NET =====

begin

 // 1

 var s := 1;

 var i := 1;

 repeat

   s += i * i * i;

   i += 2

 until i > 13;

 Println('Сумма кубов нечетных чисел от 1 до 13 равна', s);

 // 2

 var (sum, pr) := (0, 1);

 for var j := -50 to 50 do

   // если условие предполагает, что "кратны 5 и 8"

   // на самом деле означает "кратны 5 ИЛИ 8", заменить

   // в следующей строке and на or

   if (j mod 5 = 0) and (j mod 8 = 0) then

   begin

     Print(j);

     sum += j;

     pr *= j

   end;

 Writeln;

 Write('Сумма: ', sum, ', произведение: ', pr)

end.

Задача2 - пример явной глупости того, кто ее придумал. При симметрии интервала с положительными и отрицательными числами, отбираемыми по кратности, каждому отобранному положительному числу будет соответствовать такое же отрицательное, поэтому сумма всегда будет нулевой. Вычислять произведение также нет смысла, поскольку ноль кратен любому числу и он всегда будет одним из сомножителей, обнуляя результат.


ПАСКАЛЬ Задача1. Вычислить: 1³+3³+5³+…+13³, используя цикл с постусловием (Repeat). Задача2. Вывест
gutauta6

===== PascalABC.NET =====

begin

 // 1

 var s := 1;

 var i := 1;

 repeat

   s += i * i * i;

   i += 2

 until i > 13;

 Println('Сумма кубов нечетных чисел от 1 до 13 равна', s);

 // 2

 var (sum, pr) := (0, 1);

 for var j := -50 to 50 do

   // если условие предполагает, что "кратны 5 и 8"

   // на самом деле означает "кратны 5 ИЛИ 8", заменить

   // в следующей строке and на or

   if (j mod 5 = 0) and (j mod 8 = 0) then

   begin

     Print(j);

     sum += j;

     pr *= j

   end;

 Writeln;

 Write('Сумма: ', sum, ', произведение: ', pr)

end.

Задача2 - пример явной глупости того, кто ее придумал. При симметрии интервала с положительными и отрицательными числами, отбираемыми по кратности, каждому отобранному положительному числу будет соответствовать такое же отрицательное, поэтому сумма всегда будет нулевой. Вычислять произведение также нет смысла, поскольку ноль кратен любому числу и он всегда будет одним из сомножителей, обнуляя результат.


ПАСКАЛЬ Задача1. Вычислить: 1³+3³+5³+…+13³, используя цикл с постусловием (Repeat). Задача2. Вывест

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

В одной из кодировок Unicode каждый символ кодируется 16 битами. Вова написал текст (в нём нет лишних пробелов): «Собака, кошка, курица, корова, лошадь, коза, овца – домашние животные». Затем он добавил в список название ещё одного животного. Заодно он добавил необходимые запятые и пробелы. При этом размер нового предложения в данной кодировке оказался на 18 байт больше, чем размер исходного предложения. Напишите в ответе длину добавленного названия животного в символах
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Sharmel26
kuliba
sarycheva659
tiv67
Valerevna
Koranna1986
egorsalnikov1997139
bykotatyana
Pastel-sova
sodrugestvo48
orantus3
taa19707470
Эрендженова
Chikichev456
volna22051964