Какое количество информации содержится в сообщении о том, что встреча назначена на 3 октября на 15.00? решить двумя способами при алфавитного и содержательного подходов.

При алфавитном подходе выбираем мощность алфавита - пусть она будет стандартной для компьютера - 256 символов, тогда для  кодировки символа используется 1 байт. пусть встреча должна состояться в некоторый час (число минут нулевое).  самая короткая запись сообщения о дате и времени встречи - 3.10 15 и в нем 7  символов, включая пробел. тогда мы можем говорить, что сообщение несет 7  байт информации. или 7х8=56 бит. при содержательном подходе мы выбираем один из 365 дней и один из 24 часов. итого - 1 из 365х24=8760 вариантов. тогда количество информации находится по формуле бит. сравнение показывает, что содержательный подход дает оценки всегда ниже (может даже в десятки раз ниже), чем алфавитный.

Ответ - 29 var       f, f1, f2: longint;       n: integer; begin       f2 : = 1;       f1 : = 2;       n : = 2;             repeat               f : = f1 + f2;               n : = n + 1;               writeln(n,' - ',f);               f2 : = f1;               f1 : = f;       until f > = 1000000;             writeln(n - 1); end.

Рассматриваем движение тела, брошенного под углом к горизонту без начального ускорения. уравнения движения тела в осях координат известны из : также известна формула для определения времени движения тела до его падения (т.е. возвращения на исходную высоту, которая совпадает с осью x): считаем, что в начальных условиях задается количество точек, в которых нужно найти значения пути пройденного в осях координат. uses crt; const     g=9.81;     pi=3.14; var     alpha,ar,v0,t,x,y,tmax,ht,v0x,v0y: real;     n: integer; begin     clrscr;     write('vvedite alpha, v0: ');     read(alpha,v0);     write('chislo tochek= ');     read(n);     ar: =pi*alpha/180;     v0x: =v0*cos(ar);     v0y: =v0*sin(ar);     tmax: =2*v0*sin(ar)/g;     ht: =tmax/n;     t: =ht;     while t< =tmax do     begin           x: =v0x*t; y: =v0y*t-g*sqr(t)/2;           writeln('t=',t: 6: 3,' x=',x: 8: 3,' y=',y: 8: 3);           t: =t+ht     end;     readkey end. тестовое решение: vvedite alpha, v0: 45 126.4 chislo tochek= 10 t= 1.821 x= 162.864 y= 146.461 t= 3.643 x= 325.728 y= 260.375 t= 5.464 x= 488.592 y= 341.742 t= 7.286 x= 651.456 y= 390.562 t= 9.107 x= 814.320 y= 406.836 t=10.929 x= 977.184 y= 390.562 t=12.750 x=1140.048 y= 341.742 t=14.572 x=1302.912 y= 260.375 t=16.393 x=1465.776 y= 146.461 t=18.215 x=1628.640 y=    0.000