Дано трехзначное число. Верно ли что оно состоит из одинаковых цифр. Решите…

Question

47

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

в избранное ссылка

Знаете ответ?

dimon2308 · Accepted Answer

53

dimon2308

15 апреля 2023

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.

комментировать

в избранное ссылка отблагодарить