var
  Ruble, Lambda: Char;
begin
  //Char is UTF-16; any code point
  //of the base plane fits
  Ruble := #$20BD;
  Lambda := #$03BB;

  WriteLn('ruble is ', Ruble);
  WriteLn('lambda is ', Lambda);
end.