Многобайтные кодировки: Unicode (UTF-8)
Объяснение:
В ближайшее время все более важную роль будет играть особый формат Unicode (и ISO 10646) под названием UTF-8. Эта «производная» кодировка пользуется для записи символов цепочками байтов различной длины (от одного до шести), которые с несложного алгоритма преобразуются в Unicode- коды, причем более употребительным символам соответствуют более короткие цепочки. Главное достоинство этого формата — совместимость с ASCII не только по значениям кодов, но и по количеству бит на символ, так как для кодирования любого из первых 128 символов в UTF-8 достаточно одного байта (хотя, например, для букв кириллицы нужно уже по два байта).
a,n,s: integer;
begin
//0 - условие окончания ввода последовательности
repeat
readln(a);
if (a>99) and (a<1000) then begin
s:=s+a;n:=n+1;
end;
until a = 0;
if n = 0 then writeln ('В последовательности 3-х значных нет')
else writeln('Среднее арифметическое 3-х значных чисел = ',s/n);
end.
Тест №1
1
5
234
123
5
0
Среднее арифметическое 3-х значных чисел = 178.5
Тест №2
3
5
5678
12
0
В последовательности 3-х значных нет