Var s:string; k,i:integer;
begin
write('Введите текст: '); readln(s);
k:=0;
for i:=1 to length(s) do
if s[i]='a' then k:=k+1;
writeln('В заданном тексте буква а встречается ',k,' раз');
end.
По моим рассуждениям это: 3)7, была бы норм фотка то точно бы сказал.
Вычисление разности происходит следующим образом:
X - Y = X + (-Y) = X + допкод(Y).
Перевод в допкод - проинвертировать число и добавить к нему 1.
Видим, что единица добавляется позже. Тогда A = B = проинвертированный предпоследний разряд второго числа = 1. 11101111 + 1 = 11110000. С = 1, D = 0
Ответ: (2)