Составить и записать алгоритм
решения задачи в словесно-формульном и графическом виде (Блок-схема)

В строке заменить все двоеточия (:) точкой с запятой (;). Подсчитать количество замен хелп миии

ответ:var

a:string;

i,k:integer;

begin

  readln(a);

      for i:=1 to length(a) do

           if a[i]=':'then

              begin

                 a[i]:=';';

                 k:=k+1;

               end;

writeln(k);

end.