//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
1 способ
begin
var a:=ReadArrInteger(3);
a:=a.Sorted.Reverse.ToArray; a.Println;
end.
2 способ
begin
var (a,b,c):=ReadInteger3('Введите 3 числа->');
if (a>b) and (b>c) then begin Println(a,b,c); exit; end;
if (a>c) and (c>b) then begin Println(a,c,b); exit; end;
if (b>a) and (a>c) then begin Println(b,a,c); exit; end;
if (b>c) and (c>a) then begin Println(b,c,a); exit; end;
if (c>a) and (a>b) then begin Println(c,a,b); exit; end;
if (c>b) and (b>a) then begin Println(c,b,a); exit; end;
end.
<span>во времена Древнего, Среднего и Нового царств количество иероглифов приблизительно равнялось 800. В греко-римский период их число превысило 6000 иероглифов.</span><span>Среди египетских иероглифов выделяют две основные группы символов – звуковые знаки и смысловые знаки.</span>
Ответ сколько угодно в зависимости от того кто составлял, но если интересует минимальное количество то дабы закодировать 25 символов нам понадобится минимум 5 бит 2^5=32, меньше мы просто столько же не закодируем, следовательно каждый символ в таком алфавите будет весить минимум 5 бит