С клавиатуры вводится строка. Определить чётно или нет количество символов в нём. Паскаль

Question

С клавиатуры вводится строка. Определить чётно или нет количество символов в нём. Паскаль

Answer 1

Var s:string; l:integer;
begin
writeln('Введите строку:');
readln(s);
l:=length(s);
if l mod 2 = 0
 then writeln('Количество символов в строке = ',l,' четно')
 else writeln('Количество символов в строке = ',l,' нечетно');
end.

Пример:
Введите строку:
Количество
Количество символов в строке = 10 четно

Comments

L маленькая или I большая в l:integer

---

В паскале маленькие и большие буквы не различаются (если это имена переменных)

---

Да я знаю..

---

Тогда в чем вопрос? Можно писать l, можно L