Код на Паскале:
program zadacha;
var a:string; s:integer;
begin
a:='Жужжит жужелица жужжит кружится.';
s:=length(a);
writeln(s);
end.
Объяснение:
Берём строковую переменную "a" за строковую, а переменную "s" за целочисленную. "Кладём" в переменную "а" строку "Жужжит жужелица жужжит кружится.", далее в переменную s "кладём" кол-во символов в строке "Жужжит жужелица жужжит кружится." и выводим кол-во символов на экран.