Программа, которая создает в отдельном случайный массив

 

program jfe3; const n=10; {это будет кол-во элементов массива}var a: array [1..n] of integer; i,s: integer; beginfor i: =1 to n do begin a[i]: =random(100); {элемент выбирается случайно от 0 до 100} s: =s+a[i]; {когда эл. присвоился, его значение плюсуется к общ сумме} end; for i: =1 to n dowriteln(a[i],' '); {показать сам массив}writeln(s); {показать сумму}readln; {чтобы окно сразу не закрывалось}end.

 

 

 

 

program jfe3; const n=10; {это будет кол-во элементов массива}var a: array [1..n] of integer; i,s: integer; begin

 

randomizefor i: =1 to n do begin a[i]: =random(100); {элемент выбирается случайно от 0 до 100} s: =s+a[i]; {когда эл. присвоился, его значение плюсуется к общ сумме} end; for i: =1 to n dowriteln(a[i],' '); {показать сам массив}writeln(s); {показать сумму}readln; {чтобы окно сразу не закрывалось}end.

 

 

 

 

 

  так?

Var   s,ss: string;   i: integer; begin   write('введите строку: '); readln(s);   for i: =length(s) downto 1 do   begin ss: =s[i]+s[i]; insert(ss,s,i) end;   writeln('результат: ',s) end. пример решения введите строку: я умею писать программы! результат:             ! var   s: string;   i: integer; begin   write('введите слово: '); readln(s);   for i: =length(s) downto 1 do insert(' ',s,i);   writeln('результат: ',s) end. пример решения введите слово: паскаль результат:   п а с к а л ь var   s1,s2,s3: string;   i: integer; begin   write('введите первое слово: '); readln(s1);   write('введите второе слово той же длины: '); readln(s2);   s3: ='';   for i: =1 to length(s1) do s3: =s3+s1[i]+s2[i];   writeln('результат: ',s3) end. пример решения введите первое слово: корова введите второе слово той же длины: собака результат: ксоорбоавкаа

Алфавит содержит 128 символов сколькими битами можно его закодировать? . один бит соответствует двум значением 0 и  1   и можно закодировать только два значение это соответствует 2 в 1 степени. 128 символов поместится в 2 в 7 степени и будет ровняться 128 символам. получается один символ занимает 7 бит. найдем информационный объем сообщения перемножив количество символов сообщения на занимаемый объем одного символа. 130*7=910 бит.  ответ: сообщение занимает 910 бит информационного объема.