Врач-стоматолог принимает пациентов с 8 утра до 2 дня. на каждого пациента отводится по 30 минут. какое количество информации содержит сообщение о том, что петя записался на приём в 11: 30?

Нужно посчитать число вариантов, т.е. максимальное число человек которое может принять врач. он может принимать в: 8: 00,  8: 30,  9: 00, 9: 30, 10: 00, 10: 30, 11: 00, 11: 30, 12: 00, 12: 30, 13: 00, 13: 30. т.е. (14-8)*2 = 12 пациентов.  петя записался на прием в 11: 30 - это из возможных равновероятных вариантов, а значит несет информации: бита

// pascalabc.net 3.1, сборка 1172 от 19.02.2016 function kolcifr(n: integer): =n.tostring.length; begin   var a: =readarrinteger('-> ',10);   var nmax: =a[0];   var kmax: =kolcifr(nmax);   for var i: =1 to 9 do begin       var k: =kolcifr(a[i]);       if k> kmax then begin nmax: =a[i]; kmax: =k end       end;   writeln('число с макс.длиной: ',nmax) end. тестовое решение: -> 23532 195234523 423324312 6323 8523732 343235623 342 534544324 974535 253235 число с макс.длиной: 195234523

Ну вот на паскале

Объяснение:

var

    a,b,c,max:integer;

begin

   writeln('Введите возраст призеров:');

   readln(a,b,c);

   if (a < b) and (a < c) then

   begin

       max := a;

       writeln('Самый младший - первый призер, ему ',max,' лет.');

   end;

   if (b < a) and (b < c) then

   begin

       max := b;

       writeln('Самый младший - второй призер, ему ',max,' лет.');

   end;

   if (c < a) and (c < b) then

   begin

       max := c;

       writeln('Самый младший - третий призер, ему ',max,' лет.');

   end;

end.