Дано трёхзначное число.верно ли что оно состоит из одинаковых цифр. решите через паскаль.

Question

Информатика: Дано трёхзначное число.верно ли что оно состоит из одинаковых цифр. решите через паскаль.

katka55555 · Answer

var   a : integer; begin   read (a);   if (a mod 10 = a div 100) and (a mod 10 = a div 10 mod 10) then writeln ( yes ) else writeln ( no ); end....