Дано трехзначное число. нужно определить есть ли в нем одинаковые цифры паскаль. начало сделала, а вот ,что дальше не знаю program dzkan; var x,a,b,c: integer; begin writeln(введите трехзначное число'); readln(x); a: =x div 100; b: =x mod 100 div 10; c: =x mod 10;