Ответы
Ответ дал:
0
for i:= 1 to length(s) do
if s[i]=':' then
begin
inc (k);
s[i]:= ';';
end;
if s[i]=':' then
begin
inc (k);
s[i]:= ';';
end;
Вас заинтересует
2 года назад
3 года назад
3 года назад
9 лет назад
9 лет назад
10 лет назад
10 лет назад