ПАСКАЛЬ тема: строковый тип данных

[Ruqeyye]

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

Я его набрала так:

program stroka;
var s,s1:string;
    k,i:byte;
begin
    writeln('Введите строку:');
    readln(s);
for i:=pos(':',s) to length(s) do
  begin
    if (s[i]>=':')
    then s1:=s1+s[i];
  end;
  writeln('Символы от ":" ',s1);
end.

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

Вот, примерно так у меня в конце:

Введите строку:
привет как :у вас дела
Символы от ":" :увасдела

[Stilet]

if (s[i]>=':')

Убери это вообще.

[Ruqeyye]

Сообщение от Stilet

Убери это вообще.

спасибо большое) вы снова мне помогли!

[Stilet]

Наздоровье )