Напишите программу которая определяет Верно ли что введенное число состоит из одинаковых цифр
Паскаль ABC net
Ответы
Ответ дал:
0
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
begin
var s:=Abs(ReadInteger).ToString;
s.All(c->c=s[1]).Println
end.
Примеры
111211
False
2222
True
-33333
True
Внимание! Если программа не работает, обновите версию!
begin
var s:=Abs(ReadInteger).ToString;
s.All(c->c=s[1]).Println
end.
Примеры
111211
False
2222
True
-33333
True
Вас заинтересует
2 года назад
3 года назад