дарья1640
26.06.2021 19:13

Konkurentov87Петя разрабатывает прототип системы электронного документооборота. Он решил не использовать СУБД, а записывать каждый электронный документ в файл, используя собственный формат. Электронный документ состоит из двух частей: аннотации и основной части. Количество символов в аннотации (N) и в основной части (M) Петя хранит отдельно, поэтому в файл он решил записывать только последовательно коды символов сначала аннотации, а потом основной части. Сжимать данные Петя пока не научился, а из всех кодировок прочитал только про двухбайтную кодировку. Эту кодировку он и решил использовать для записи кодов символов, тем более что тексты документов могут содержать символы различных языков. Вася заметил, что по требованиям к системе документооборота в аннотации к документу возможно использовать только ограниченное количество символов, а именно, строчные и прописные буквы латинского и русского алфавитов, арабские цифры и 30 знаков препинания и специальных символов. Вася рассчитал, что если для аннотации хранить коды символов, используя минимальное, одинаковое для всех символов количество бит, а для основной части по-прежнему использовать двухбайтную кодировку, размер файла уменьшится ровно на 1/8. Затем Вася проанализировал требования к основной части документа и заметил, что количество символов в алфавите основной части можно уменьшить в 4 раза по отношению к количеству символов в алфавите, которое может быть при двухбайтной кодировке. Тогда Вася предложил еще уменьшить размер файла за счет того, что для основной части хранить коды символов нового алфавита, используя минимальное, одинаковое для всех символов количество бит. В результате расчетов размер нового файла получился на 3584 байт меньше, чем был у исходного файла Пети. Определите количество символов в аннотации (N) и количество символов в основной части (M). В ответе укажите через пробел два целых числа, сначала N, а затем [email protected]

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
07Лизочек07
02.12.2020 14:51
1. В приведенном коде ошибка. Не хватает ";" в третьей строке снизу.
2. Немного изменим ваш код и получим искомое значение x
Искомое число х = 16293

var
  x, y, a, b, k: integer;

begin
  k:=10000;
  repeat
    x:=k;
    a := 0; b := 0; y := 1;
    while x > 0 do
    begin
      if (x mod 10) mod 2 = 0
        then
        a := a * 10 + x mod 10
      else begin
        y := y * 10;
        b := b * 10 + x mod 10
      end;
      x := x div 10
    end;
    a := a * y + b;
    k := k + 1;
    until a = 26391;
    writeln(a:8, k-1:8); 
end.

 
0,0(0 оценок)
Ответ:
Vladislava111111111
19.05.2020 12:00
Рассматриваем движение тела, брошенного под углом к горизонту без начального ускорения. Уравнения движения тела в осях координат известны из физики:
\begin {cases} x=v_0t\cdot \cos\alpha \\ \displaystyle y=v_0t\cdot \sin\alpha-\frac{gt^2}{2} \end {cases}
Также известна формула для определения времени движения тела до его падения (т.е. возвращения на исходную высоту, которая совпадает с осью X):
\displaystyle t= \frac{2v_0\sin\alpha}{g}
Считаем, что в начальных условиях задается количество точек, в которых нужно найти значения пути пройденного в осях координат.

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
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота