1) для кодировки используется последовательность русского алфавита.
ключ: код
У кого сильные мышцы, тот победит одного. Кто силён знаниями, тот победит тысячи.
2) использыется последовательность русского алфавита, только со смещением на 1 букву. т.е. первая буква будет Я, вторая А, третья Б и т.д.
ключ: интернет
Трудно в учении - легко в бою
3) можно использовать код Цезаря (для кодировки нужной буквы используется буква, стоящая далее по алфавиту третьей)
ключ: длх - наименьшая единица измерения информации (бит)
ЦФТЗШ
var i:integer;
a:array[1..100] of real;
begin
writeln('Введите последовательность чисел. 0 - конец последовательности.');
read(a[1]);
i:=2;
while true do
begin
read(a[i]);
if a[i]=0 then
break;
if a[i]>=a[i-1] then
begin
writeln('No.');
halt;
end;
inc(i);
end;
writeln('Yes.');
end.