Ввести с клавиатуры строку символов.Вывести отдельной строкой строчные латинские буквы и подсчитать их количество.

С кавычками всё в порядке, мой компилятор не ругается. Но я неправильно написала length (это уже правильный вариант), поэтому твой компилятор ругается. Исправь и всё сработает.

неправильно написание длины строки я сразу заметил и исправил,все таки дело в паскале,который ругается на кавычки.

Наверно, попробуй проверить на онлайн компиляторе.

Спасибо за помощь,программа заработала)

Не за что!)

program z1;var a: string; b, c, i: integer;beginreadln (a); writeln ();c:= 0;b:= lenght (a);for i:=1 to b doif (a[i] >= 'a') and (a[i] <= 'z') then beginwrite (a[i]); c := c + 1; end;writeln (c);end.Надеюсь, этот вариант сработает.