написать пример строковой процедуры : Val, Pos, str

val:Например m:='123', после выполнения процедуры val(m,a,c) получим a=123 и c=0;pos:Например a:=pos('м','информатика'), после этого значение а будет равняться 6.str:Например s:=345, после выполнения процедуры (a,s), получим s='345'.