1. Представьте число 52 (10 СС) в беззнаковом 8-разрядном формате. * 2. 01100101 - прямой код, записанный в 8-разрядном формате со знаком. Найти десятичный эквивалент этого числа. *
-101
100
-100
101

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.

program xxx;   var a, b, min : integer; begin  write('введите число а=');  

    readln(a);

  min: =10;   while a < > 0 do      begin            b: = a mod 10;             if b < min then min: =b;             a: = a div 10      end;     writeln('минимальная цифра = ', min);   readlnend.

у нас интересные школьные дела. мы выпускаем свою газету, куда любой ученик может написать заметку и нарисовать рисунок. участвуем в школьных олимпиадах. а потом лучших на линейке. в феврале у нас проходит неделя наук. на этой неделе проходит много конкурсов, открытых уроков и интересных соревнований.

ваня на п

саша на в

коля на с

петя на к