Ultra-SiMPLE
string = keyin text ("Type something: ")
size = length(string)
first = extract(string,0,0)
last = extract(string,size-1,size-1)
Display "You typed ",size," characters"
Display "The first character was: ",first
Display "The last character was: ",last