Паскаль, срочно Напишите программу, которая определяет правильность записи целого числа...

0 голосов
83 просмотров

Паскаль, срочно
Напишите программу, которая определяет правильность записи целого числа в восьмеричной системе счисления.

Формат входных данных

На вход программы поступает символьная строка.

Формат выходных данных

Программа должна вывести ответ 'YES', если строка представляет собой правильную запись целого числа в восьмеричной системе счисления, и 'NO', если запись ошибочна.

Примеры

входные данные выходные данные
12345
YES


Информатика | 83 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
// PascalABC.NET 3.2, сборка 1383 от 09.02.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString;
  if s.MatchValue('[0-7]*')=s then Writeln('YES')
  else Writeln('NO')
end.
(150k баллов)