Программа просит ввести пользователя число, длину генерируемой последовательности. Затем создается массив нужной длины, заполняется значениями от 0 до 50. Затем во втором цикле просматривается каждый элемент массива, - если он кратен 5, то число выводится на экран и суммируется.
В конце программа выводит итоговую сумму найденных элементов.
13. температура от 0 до 63 - всего 64 значения. Для кодирования 64 значений достаточно 6 бит (потому что 2⁶=64). 6 бит на одно измерение, всего 10 измерений, тогда информационный объем 6*10=10 бит
14. алфавит содержит 16 символов. для кодировки каждого достаточно 4 бита (потому что 2⁴=16) В сообщении 3 символа, каждый кодирован 4 битами, тогда общий объем информации 3*4=12 бит.
15. Звуковой файл записан с частотой 16000 Гц, разрешением 8 бит, 2 канала и длительность 1 минута.
То есть каждую секунду берется 16000 отсчетов и каждое значение кодируется 8 битами, получаем 16000*8=128000 бит за 1 секунду записи. Но каналов 2 - тогда за 1 секунду записи получаем 128000*2=256000 бит информации. Всего длительность записи 1 минута=60 сек. Общий объем информации будет 256000*60=15360000 бит, или 15360000/8=1920000 байт, или 1920000/1024=1875 кБ.
Программа:
{Free Pascal Compiler version 3.0.4+dfsg-23 [2019/11/25] for x86_64}
{Copyright (c) 1993-2017 by Florian Klaempfl and others}
{Target OS: Linux for x86-64}
program test;
Uses Math;
var
A : array of integer;
N, S, i : integer;
begin
Randomize;
S := 0;
write('Укажите длину последовательности: ');
Readln(N);
{Генерация и печать массива}
SetLength(A, N);
for i := 1 to N do begin
A[i] := Random(50);
write(A[i], ' ');
end;
writeln; writeln('------------------------------');
for i := 1 to N do
{Определение кратности элемента массива числу 5}
if A[i] mod 5 = 0 then begin
{Вывод на экран этого числа}
write(A[i], ' ');
{Подсчет суммы чисел}
S := S + A[i];
end;
writeln;
{Вывод на экран суммы}
writeln('Сумма - ', S);
end.
Объяснение:
Программа просит ввести пользователя число, длину генерируемой последовательности. Затем создается массив нужной длины, заполняется значениями от 0 до 50. Затем во втором цикле просматривается каждый элемент массива, - если он кратен 5, то число выводится на экран и суммируется.
В конце программа выводит итоговую сумму найденных элементов.
Результат выполнения программы:
Объяснение:
13. температура от 0 до 63 - всего 64 значения. Для кодирования 64 значений достаточно 6 бит (потому что 2⁶=64). 6 бит на одно измерение, всего 10 измерений, тогда информационный объем 6*10=10 бит
14. алфавит содержит 16 символов. для кодировки каждого достаточно 4 бита (потому что 2⁴=16) В сообщении 3 символа, каждый кодирован 4 битами, тогда общий объем информации 3*4=12 бит.
15. Звуковой файл записан с частотой 16000 Гц, разрешением 8 бит, 2 канала и длительность 1 минута.
То есть каждую секунду берется 16000 отсчетов и каждое значение кодируется 8 битами, получаем 16000*8=128000 бит за 1 секунду записи. Но каналов 2 - тогда за 1 секунду записи получаем 128000*2=256000 бит информации. Всего длительность записи 1 минута=60 сек. Общий объем информации будет 256000*60=15360000 бит, или 15360000/8=1920000 байт, или 1920000/1024=1875 кБ.
Такого ответа нет, возможно ошибка.