var
  a,b,c,d,e:char;
  x1,x2,x3,x4,x5:integer;
begin
  x1:=strtoint(edit1.Text);
  x2:=strtoint(edit2.Text);
  x3:=strtoint(edit3.Text);
  x4:=strtoint(edit4.Text);
  x5:=strtoint(edit5.Text);
  a:=chr(x1+96);
  b:=chr(x2+96);
  c:=chr(x3+96);
  d:=chr(x4+96);
  e:=chr(x5+96);
  Edit6.Text:=a+b+c+d+e;
end;