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

VAR
   c: Char;
BEGIN
   Assign(input, input.txt); ReSet(input);

   Read(c); 
   If (c <> 1) then begin Write(NO); Exit; End;

   While (not eoln(input)) do begin
      Read(c);
      If (c <> 0)and(c <> 1) then begin Write(NO); Exit;
   End;
END.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.