Предмет: Информатика, автор: destanto38

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

Ответы

Автор ответа: JustPeople
0
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.
Похожие вопросы
Предмет: Алгебра, автор: Sky658