Вот я тоже захотел найти но нигде нету но я думаю что Файл Сохранить как
Var
x, y, z, a, b: real;
begin
readln(x, y, z);
a := x * x * x * sqr(Tan(sqr(x + y))) + z / sqrt(x + z);
b := (y * x * x - z) / (exp(z * x) - 1);
writeln('a=', a);
writeln('b=', b);
end.
Алфавит,содержащий два символа, называется двоичным алфавитом.
Поэтому для кодирования 26 символов достаточно пятиразрядного кода.