Вводится n строка, найти кол-во пробелов в ней. pascal abc

Var  n: string;   a: integer; procedure chet(n: string; var a: integer); begin while pos('  ',n)< > 0 do       //пока в строке есть пробелы        begin         a: =a+1;               //к счетчику пробелов + 1         delete(n,pos('',n),1);       //удалить текущий пробел       end; end; begin   readln(n);         // вводим строку     a: =0;                 //обнуляем счетчик   chet(n,a)           //считаем пробелы   writeln(a);         //выводим кол-во пробелов end.       

Рассмотрим полный  условный оператор  паскаля: if  b  then  s1  else  s2 здесь  if  (если),  then  (то) и  else  (иначе) являются служебными словами,  в  – логическое выражение, а  s1  и  s2  – операторы. выполнение такого условного оператора в паскале сводится к выполнению одного из входящих в него операторов s1 или s2: если заданное в операторе условие выполняется (логическое выражение в принимает значение true), то выполняется оператор s1, в противном случае выполняется оператор s2.

11001000

Объяснение:

1. Для получения прямого кода надо перевести число в двоичную систему счисления, дополнить слева незначащими нулями до необходимого разряда, первый (левый) разряд отводится под знак числа (если число положительное, то в левый разряд записывается 0, а если число отрицательное, то в левый разряд записывается 1)

56/2 = 28 и остаток 0

28/2 = 14 и остаток 0

14/2 = 7и остаток 0

7/2 = 3 и остаток 1

3/2 = 1 и остаток 1

1/2 = 0 и остаток 1

56₁₀ = 111000₂

Прямой код: 10111000

2. Обратный код для положительного числа совпадает с прямым кодом. Для отрицательного числа все цифры числа заменяются на противоположные (1 на 0, 0 на 1), а в знаковом разряде остаётся единица

Обратный код: 11000111

3. Дополнительный код положительного числа совпадает с прямым кодом. Для отрицательного числа дополнительный код образуется путем добавлением к младшему разряду обратного кода единицы (сложение в двоичной системе счисления)

1 + 1 = 10 (0 пишем, 1 в уме)

1 + 1 (из ума) = 10 (0 пишем, 1 в уме)

1 + 1 (из ума) = 10 (0 пишем, 1 в уме)

0+ 1 (из ума) = 1 (1 пишем)

сносим остальные цифры

Дополнительный код: 11001000