Найдем кол-во символов в сообщении:
K=32*40*8=10240
Найдем информационный объем одного символа:
10 кб переводим в биты: 10*1024*8=81920, тогда информационный объем одного символа (i) = 81920/10240 = 8, тогда кол-во символов в алфавите (N):
N=2^i (2 в степени i) = 2^8 = 256.
Ответ: в алфавите 256 символов
Repeat
a:=a+1;
b:=Arr[a];
writeln(b);
until b = 0;
Вероятно так
Var
s,p:real;
i,j:integer;
a:array[1..3]of real;
begin
readln(a[1],a[2],a[3]);
for i:=1 to 3 do
for j:=1 to 3 do
if a[j]>a[i] then
begin
p:=a[i];
a[i]:=a[j];
a[j]:=p
end;
if a[1]+a[2]>a[3] then
begin
p:=(a[1]+a[2]+a[3])/2;
s:=sqrt(p*(p-a[1])*(p-a[2])*(p-a[3]));
for i:=1 to 3 do
write(a[i],' ');
writeln;
writeln('Площадь треугольника: ',s);
end
else writeln('Треугольник не существует');
<span>end.</span>
Только что созданный текстовый файл получил расширение txt
Подобранные пары похожих понятий:
- Веселье - грусть (эмоции)
- Весна - осень (времена года)
- Монитор - клавиатура (компьютерные устройства)
- Стол - диван (предметы мебели)
- Береза - осина (деревья)
- Автомобиль - самолет (средства передвижения)
- Арбуз - гуляш (съедобное)