Почему в программе выходит сообщение «Type mismatch»?

Question

[Павел]

Я новичок в программировании и написал программу на Делфи которая должна определить какие латинские символы встречаются в заданной строке. Выходит следующая ошибка - "Type mismatch" (строка с ошибкой указана в виде комментария):

Program MMM;
var
Stroka : string;
LChars : set of 'a'..'z';
simv : char;
i : integer;
begin
Readln(Stroka);
LChars:= [];

for i:= 1 to Length(Stroka) do
   if Stroka[i] in ['a'..'z'] then LChars:= LChars + Stroka[i];  // В этой строке выходит указанная ошибка

for Simv:= 'a' to 'z' do if simv in LChars then Write(simv, '  ');

readln;
end.

Answer 1

[Виталий Витренко]

В строке с ошибкой используйте вместо
LChars:= LChars + Stroka[i];
процедуру Include
Include(LChars, Stroka[i]);
Еще есть такая форма записи через оператор +
LChars:= LChars + [Stroka[i]];

Comments

[Павел]

Спасибо, очень помогло)