Спо информатике через pascal: 1. с клавиатуры вводятся целые числа, признак окончания ввода - четное число, вычислить количество двузначных, сумму - последняя цифра больше 5. входные данные: -7, 11, 29, 115, 28 выходные данные: k=2, s=22 2. с клавиатуры вводят n целых чисел, посчитать произведение положительных кратных 3. входные данные: 6, -21, 13, 7, 3, 12, -6 выходные данные: p=36 3. с клавиатуры вводятся n целых чисел, найти среднее арифметическое положительных значений. , буду .

{1}

var
  a,k,s: integer;
begin
  read(a);
  k := 0; s := 0;
  while a mod 2 <> 0 do
    begin
    if abs(a) mod 10 > 5 then
      s := s + a;
    a := abs(a);
    if (a > 9) and (a < 100) then
      k := k + 1;
    read(a);
    end;
  writeln('k=',k,', s=',s)
end.

{2}

var
  n,i,p,a: integer;
begin
  read(n);
  p := 1;
  for i := 1 to n do
    begin
    read(a);
    if (a > 0) and (a mod 3 = 0) then
      p := p * a;
    end;
  writeln('p=',p)
end.

{3}

var
  n,a,i,k,s: integer;
begin
  read(n);
  k := 0; s := 0;
  for i := 1 to n do
    begin
    read(a);
    if a > 0 then
      begin
      s := s + a;
      k := k + 1;
      end;
    end;
  if k = 0 then k := 1;
  writeln('s=',s/k)
end.

1)

так как в предложении 37 символов

37*2(так как каждый символ 2 байта) = 74 байта

байты переводим в биты получаем 74 * 8 = 592 бита

2)

20*32*16 = 10240 (количество символов в статье)

каждый символ кодируется 16-ю битами,

10240 * 16 = 163840 бит.

можно перевести в килобайты.

163840 бит/8 = 20480 байт

20480/1024 = 20 кб.

ответ: 20 килобайт.

3)

160 / 8 = 20. Итого 20 символов, т.к. в 1 байте - 8 бит.

4)

0,5*1024*8/256=16 бит

5)

Общий объём ста­тьи равен x · 64 · 48 · 16 бит = 48 Кбайт.

Сле­до­ва­тель­но, ко­ли­че­ство стра­ниц в ста­тье рав­ня­ет­ся:

x = (48 · 1024 · 8)/(64 · 48 · 16) = 8.

6)

80 * 25 = 2000 символов поместится на экране монитора.

Т.к в кодировке Unicode каждый символ кодируется 16 битами, то

2000 * 16 = 32 000 бит = 32 байта.

ответ: объем текста занимающего весь экран монитора в кодировке Unicode примерно 32 байта.

7)

40 * 32 * 4 = 5120 символов в сообщении.

5 Кбайт = 5120 байт.

5120 / 5120 = 1 байт, значит, на кодирование 1 символа отводится 8 бит.

Получается, в алфавите 2^8 = 256 символов.

1)

так как в предложении 37 символов

37*2(так как каждый символ 2 байта) = 74 байта

байты переводим в биты получаем 74 * 8 = 592 бита

2)

20*32*16 = 10240 (количество символов в статье)

каждый символ кодируется 16-ю битами,

10240 * 16 = 163840 бит.

можно перевести в килобайты.

163840 бит/8 = 20480 байт

20480/1024 = 20 кб.

ответ: 20 килобайт.

3)

160 / 8 = 20. Итого 20 символов, т.к. в 1 байте - 8 бит.

4)

0,5*1024*8/256=16 бит

5)

Общий объём ста­тьи равен x · 64 · 48 · 16 бит = 48 Кбайт.

Сле­до­ва­тель­но, ко­ли­че­ство стра­ниц в ста­тье рав­ня­ет­ся:

x = (48 · 1024 · 8)/(64 · 48 · 16) = 8.

6)

80 * 25 = 2000 символов поместится на экране монитора.

Т.к в кодировке Unicode каждый символ кодируется 16 битами, то

2000 * 16 = 32 000 бит = 32 байта.

ответ: объем текста занимающего весь экран монитора в кодировке Unicode примерно 32 байта.

7)

40 * 32 * 4 = 5120 символов в сообщении.

5 Кбайт = 5120 байт.

5120 / 5120 = 1 байт, значит, на кодирование 1 символа отводится 8 бит.

Получается, в алфавите 2^8 = 256 символов.