Число 1000101 в восьмиразрядном представлении имеет вид: 100000101 000101 2000101 01000101

Вообще это 105, если речь идёт про восьмеричную систему.

105 да имеет систему

Смотрите, в двоичной системе исчесления все меряется в битах и байтах. 0000 0000, это байт, т.к. состоит из восьми бит. Биты же бывают положительными и отрицательными, равняются положительные единице, отрицательные же нулю. Но тут важно понимать, как ПК воспринимает эти числа. Число 5 будет выглядить как 0000 1001, потоиу что в байте сложили числа 1 и 4 (00000001 и 00001000), на то эта система и двоичная, т.к. нечетные числа получают путем складывания четных. Путем включения каждого бита отдельно мы получим такие числа, как

00000001 - 1. 00000010 - 2. 00000100 - 4. 00001000 - 8. 00010000 - 16. 00100000 - 32. 01000000 - 64. 10000000 - 128. Число 129 займет два байта, а значит у Горыныча не останется места для голов. ответ - он умрет от нехватки битов в байтах.

Ну, наверное это должно выглядеть как то так. Я плохо помню паскаль

program Help;   #Заголовок

var  #Раздел с переменными

a, b ,c, summ : real;   #Входные переменные и по итогу их сумма, вещественные

begin  #Думаю понятно

   summ := 0;   #Инициализация summ, ибо статическая типизация

   writeln('Enter nums');   #Программа попросит ввести числа

   readln(a);  #Считывание

   readln(b);  #Считывание

   readln(c);  #Считывание

   

   if a > 0 then summ += a;  #Если переменная а больше нуля, прибавляем её к итоговой переменной

   if b > 0 then summ += b;  #Аналогично

   if c > 0 then summ += c;   #Аналогично

   

   write(summ);   #Выводим переменную summ на экран

       

end.