Проверить, является ли введенная с клавиатуры строка двоичным числом - Pascal ABC
Формулировка задачи:
Написать программу которая проверяет является ли введенная с клавиатуры строка двоичным числом.
Решение задачи: «Проверить, является ли введенная с клавиатуры строка двоичным числом»
textual
Листинг программы
var s:string;
n,i:byte;
begin
writeln('Введите строку');
readln(s);
n:=length(s);
i:=1;
while (i<=n) and (s[i]in ['0','1']) do inc(i);
if i>n then writeLn('Это двоичное число')
else writeLn('Это не двоичное число');
end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д