Задача:Дана последовательность символов, заканчивающаяся знаком «*». Известно, что среди этих символов есть двоеточие. Определить количество букв «l», стоящих после двоеточия.
program lab_816;
var
ch:char;
kol:integer;
begin
writeln('vvedite stroky');
repeat
read(ch);
if ch=':' then
begin
kol:=0;
............. ; <-- что здесь надо написать???
end
until ch='*';
writeln(kol);
readln;
readln
end.