Предмет: Информатика,
автор: КСеня1106
Напишите программу которая определяет Верно ли что введенное число состоит из одинаковых цифр
Паскаль ABC net
Аноним:
https://znanija.com/task/28404976
Поставьте точку с запятой после readln(z) в третьей строчке - опечатка..
Ответы
Автор ответа:
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
Похожие вопросы
Предмет: Математика,
автор: kanaocuuri52
Предмет: Математика,
автор: Kast40
Предмет: Русский язык,
автор: AskarbekInkar
Предмет: Геометрия,
автор: keenneenenene