Як написати програму мовою паскаль яка буде рахувати кількість унікальніх букв у слові

Для программы обычно  необходимы входные значения и соответственно то, что она возвращает. вот, если она принимает с каждой новой строки (ввел длину одной стороны  - enter) по одному значению. на выходе она отдаст "true" - истина (если хоть  две стороны равны) или "false" - ложь. var a, b, c: integer; begin readln(a); readln(b); readln(c); if (a=b) or (a=c) or (c=b) then writeln('true - trikutnik rivnobedrenyj') else writeln('false - trikutnik ne rivnobedrenyj'); end. код полностью рабочий, только что проверен. текст в 'кавычках' можно заменить на любой другой, но не используя символов кириллицы. писать только на раскладке vot tak, kak bi eto ne bilo ushasno or typicaly print in english. все знаки препинания и другие символы  необходимо переписать в точности, не забывайте.