Var m,n,s,x:integer;beginreadln(m,n);x:=m;while (m>0)and(n<>0)and(x>=n) dom:=m-n;s:=0;while m<1 dobegins:=s+1;m:=m+1end;
m:=x;x:=n;while (n>0)and(m<>0)and(x>=m) dobeginn:=n-m; s:=0end;while n<1 dobeginn:=n+1;s:=s+1end;writeln(s)end.
http://excelpractic.ru/kak-postroit-grafik-v-excel.html
1) 00, 01, 10, 11 - 4 последовательности
2) 000, 001, 010, 100, 011, 110, 101, 111 - 8 последовательностей
3) 16 последовательностей
4) 32 последовательности
Неверный ответ 1102, так как двочная система состоит из чисел 1 и 0