Племя мульти пишет письма пользуясь 16-символьным алфавитом. племя пульти пользуется 32 символьным алфавитом. вожди племён обменялись письмами. письмо племени мульти содержит 120 символов, а пульти 96 символов. сравните информационные объёмы сообщений содержащихся в письмах.
написать дано, решение с формулой ​

дано:

[tex]n_{1}[/tex]=16; [tex]n_{2}[/tex]=32; [tex]k_{1}[/tex]=120; [tex]k_{2}[/tex]=96;

сравнить: [tex]i_{1}[/tex], [tex]i_{2}[/tex]

решение:

[tex]n=2^{i}[/tex] => [tex]i=log_{2}n[/tex]

[tex]i_{1}=4[/tex] бит, [tex]i_{2}=5[/tex] бит

[tex]i_{1}=k_{1}*i_{1}[/tex], [tex]i_{2}=k_{2}*i_{2}[/tex]

[tex]i_{1}=480[/tex] бит, [tex]i_{2}=480[/tex] бит

вывод:

оба письма по информационному объему равны между собой и равны 480 бит = 60 байт

1

a)

program pr;

var

s: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

writeln('введите заданный символ');

readln (c);

for i: =1 to length(s) do if s[i]=c then writeln ('в строке найден заданный символ');

readln;

end.

б)

program pr;

var

s,n: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

i: =1;

while s[i]< > ' ' do i: =i+1;

n: =copy(s,1,i-1);

writeln(n);

readln;

end.

в)

program pr;

var

s,n,f: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

i: =1;

while s[i]< > ' ' do i: =i+1;

n: =copy(s,1,i-1);

f: =copy(s,i+1,length(s)-i+1);

writeln(n);

writeln(f);

readln;

end.

program pr;

var s: string;

begin

s: ='касіу ясь канюшыну';

delete (s,7,3);

insert ('слово которое хотите вставить',s,7);

writeln (s);

readln;

end.

30 * 70 = 2100 символов на 1 странице

5 * 2100 = 10500 символов на 5 страницах

при кодировке ascii - 1 символ = 1 байт, значит 20500 байт оперативной памяти займет этот текст.