Скорость передачи данных по некоторооу каналу связи равна 32 кбит/с. передача текстового файла по этому каналу связи заняла 15 с. определите, сколько страниц содержал переданный текст, если известно, что информационный весодного символа равен 8 битам, а на одной странице 48 символов.

32 кбит/с*16 с=524288 бит=65536 кбайт.

вес 1 страницы=8*48=384 бит.48

кол-во стр=524288/384=1365 страниц

 

// pascalabc.net 3.0, сборка 1088 const   n=9;   m=7; var   a: array[1..n,1..m] of integer;   b: array[1..n] of boolean;   i,j,k: integer; begin   randomize;   writeln('*** исходный массив ***');   for i: =1 to n do begin       k: =0;       for j: =1 to m do begin           a[i,j]: =random(225)-112;           write(a[i,j]: 5);           if a[i,j]< 0 then inc(k)           end;       writeln;       b[i]: =k> 3   end;   writeln('*** строки, содержащие больше 3 отрицательных элементов ***');   for i: =1 to n do       if b[i] then write(i,' ');   writeln end. тестовое решение: *** исходный массив ***     89  -71    36  -25  -19    60  -28   -60  -35    20  112  -69    29    74       4  -23    -7  -15  107    64    -4   -82    91  102  -90    81    32  -64     41  -44    21    74    77  -77 -100   -38  -36  100      5  -42    54    46   -52    27  -86  -77    90    30    -2   -76  -14  -58    11    67  -91    59   -50    47  -47    12  -84  -76    11 *** строки, содержащие больше 3 отрицательных элементов *** 1 3 7 8 9

Расстояние от точки до начала координат находится как длина гипотенузы прямоугольного треугольника, катетами которого являются координаты точки. поскольку нам нужны не сами расстояния, а лишь сравнить их, то можно сравнивать квадраты, чтобы не извлекать корня. // pascalabc.net 3.0, сборка 1088 var   x1,x2,y1,y2,r1,r2: real; begin   write('введите координаты первой точки: '); read(x1,y1);   write('введите координаты второй точки: '); read(x2,y2);   r1: =sqr(x1)+sqr(y1); r2: =sqr(x2)+sqr(y2);   if r1> r2 then writeln('ближе вторая точка')   else       if r1< r2 then writeln('ближе первая точка')       else writeln('точки равноудалены') end. тестовое решение: введите координаты первой точки: 16.3 -11.7 введите координаты второй точки: 15.8 12 ближе вторая точка