1)
var
i,k:integer;
a:array [1..14] of integer;
begin
k:=0;
for i:=1 to 14 do
begin
a[i]:=random(46)-15;
write(a[i]:3);
if a[i] mod 2=0 then k:=i;
end;
if k>0 then
begin
for i:=k to 13 do a[i]:=a[i]+1;
a[14]:=0;
end;
writeln;
for i:=1 to 14 do write(a[i]:3);
end.
2)
var
i,k:integer;
a:array [1..14] of integer;
begin
for i:=1 to 14 do
begin
a[i]:=random(46)-15;
write(a[i]:3);
end;
for i:=1 to 7 do
begin
k:=a[i];
a[i]:=a[i+7];
a[i+7]:=k;
end;
writeln;
for i:=1 to 14 do write(a[i]:3);
end.
#include <iostream>
#include <map>
using namespace std;
int main()
{
string text = { "hello my name is paperman" }; // наш текст
string word = { "" }; // слово для сравнения
cin >> word; // просим ввести сравниваемую букву
map<char, unsigned> key_map;
for(auto i: text) {
if (word.find(tolower(i)) != string::npos) {
++key_map[tolower(i)] ;
}
}
for(auto &pair : key_map) {
cout << "char: " << pair.first << " | count: " << pair.second << endl ;
}
return 0;
}
№1
1) Переведем число 11111012
Для этого переведем его сначала в десятичную вот так:
11111012 = 1∙2⁶+1∙2⁵+1∙2⁴+1∙2³+1∙2²+0∙2¹+1∙2⁰ = 64+32+16+8+4+0+1 = 125₁₀
2) Переведем число AF16
Для этого переведем его сначала в десятичную вот так:
AF₁₆ = 10∙16¹+15∙16₀ = 160+15 = 175₁₀
3) Переведем число 368
Для этого переведем его сначала в десятичную вот так:
36₈ = 3∙8¹+6∙8₀ = 24+6 = 30₁₀
Получим (125+175):30=300:30=10.
№2
125₈ = 1∙8²+2∙8¹+5∙8⁰ = 64+16+5 = 85₁₀
101₂ = 1∙2²+0∙2¹+1∙2⁰ = 4+0+1 = 5₁₀
2A₁₆ = 2∙16¹+10∙16⁰ = 32+10 = 42₁₀
141₈ <span>= 1∙8</span>²+4∙8¹+1∙8⁰<span> = 64+32+1 = 97</span>₁₀
Получим 85+5*42-97=198
Program n1;
<span>var a,b,c,s,p:real;
</span><span>begin
</span><span>readln(a);
</span><span>readln(b);
</span><span>readln(c);
</span><span>if (a+b>c) and (a+c>b) and (b+c>a) then
</span><span>begin
</span><span>p:=a+b+c;
</span><span>s:=sqrt(p*(p-a)*(p-b)*(p-c));
</span><span>writeln('периметр=',p);
</span><span>writeln('площадь=',s);
</span><span>end else
</span><span>writeln('треугольник не существует');
</span><span>end.</span>
Код Бодо отводит на каждый символ по 5 бит вне зависимости от частоты использования символов.
Меж тем, в естественных языках есть очень часто используемые буквы, и есть буквы, применяемые реже.
В коде Морзе частым буквам сопоставлены короткие комбинации, двухбитовые, более редко применяемым буквам - более длинные коды.
Таким образом, код Морзе позволяет передать больше символов, чем код Бодо по одному и тому же каналу связи