St, k айнымалылары айнымалылар бөлімінде төмендегідей анықталған: Var ST: string[4];           k: integer; k:=Length(st) стандарттық процедураның қызметі қандай?