47

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

22 февраля 2023

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

категория: информатика



53

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.

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


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...