Base64: "<span>FROMBLOG"
//////////////////////////////////</span>
<span>Const k = 10;
Var a,b,c,m,n : Integer;
Begin
For m:=1 to k do
For n:=1 to k do
Begin
a:=sqr(m)-sqr(n);
b:=2*m*n;
c:=sqr(m)+sqr(n);
Writeln(m:5,n:5,a:8,b:8,c:8);
end;
end.</span>
В русском алфавите всего 33 буквы,следовательно подставим буквы под цифровые значения,получается,что:
1-А
2-Б
...
33-Я
Челнокова-256131516121631
Екатерина-61212061810151
<span>Романовна-181614115163151</span>
Пример таблицы (с 5 товарами) - в прилагаемом файле.
Объем получаемой инф. зависит оттого, насколько она уменьшает не определеноость