11110001 1.Запишите в десятичной системе счисления целое число, если дан его дополнительный код. (выше)
2.Выполните сложение этого числа и числа, заданного в десятичной системе счисления, в дополнительном коде и в шестнадцатеричной системе счисления. Переведите результат в десятичную систему счисления.
3.Сложите заданное дополнительным кодом число из п. 1 с десятичным числом, заданным в п. 2 в двоично-десятичной системе счисления. Проверьте правильность вычислений переводом результата в десятичную систему счисления.

var n,a,b,c,d,s: integer;

begin

  write('n='); readln(n); {n -   даанное 4-хзначное число}

  a: =n mod 10; {последняя, 4-я, цифра числа}

  b: =(n div 10) mod 10; {предпоследняя, 3-я, цифра}

  c: =(n div 100) mod 10; {2-я цифра}

  d: =n div 1000; {1-я цифра}

  s: =a+b+c+d;

    writeln('s=',s);

end.

(1+1/sqr((12*x), если без игрика, а как игрик впихнуть не могу

смотри схему                                                  

program 1;

var i, dlina, shirina, visota,  n, s, v : integer; beginwriteln(’введите число залов‘); readln (n); for  i: =1  to  n  do  beginwriteln(’введите длину,ширину и высоту зала‘); readln (dlina, shirina, visota); s: =dlina*shirina; v: =s*visota; writeln(‘площадь  пола=’,s,’  объем  зала=‘,v); endend.

если это 8-9 класс, то должно быть