1. Написать программу, на экране которой печатается число, равное количеству символов в строке. Например, «Судьба» - 6; «Свобода» -7.
Var s:string; begin readln(s); writeln(length(s)); end.