Помогите. С клавиатуры вводиться предложение. Составить программу, которая определяет количество символов в нём.

begin

 var str:=ReadString('Введите строку').Length.Print

end.