Составить программу в поскале (с клавиотуры водят слова ,вывести на экран длину этого слова!!!)
Var a:string; begin readln(a); writeln(length(a)); end.