* В кодировке КОИ-8 каждый символ кодируется 1 байтом. Матвей написал текст (в нём нет лишних пробелов):

Лев, Дева, Весы, Скорпион, Стрелец, Козерог, Водолей, Рыбы, Телец, Близнецы, Рак – названия знаков зодиака.

Ученик удалил из списка название одного знака зодиака. Заодно он удалил ставшие лишними запятые и пробелы – два пробела не должны идти подряд. При этом размер нового предложения в данной кодировке оказался на 72 бита меньше, чем размер исходного предложения. Среди знаков зодиака, имеющих одинаковое количество букв, Матвей удалил название, идущее последним по алфавиту. Запишите в ответе название знака зодиака, удаленное Матвеем.

program xxx;

  var i, n : integer;

begin

  write ('введите число n-');

  readln (n);

  writeln('делители числа: ');

  for i : =1 to n do

    if n mod i = 0 then writeln (i)

end.

256 кбайт = 2^8 * 2^13 = 2^21 бит

2 мбайт = 2 * 2^23 = 2^24 бит

2^21 : 2^18 = 2^3 = 8 сек, потребуется для получения толей первых 256 кбайт

2^24 : 2^15 = 2^9 = 512 сек, потребуется мише чтобы скачать 2 мбайта

8 + 512 = 520 сек потребуется мише для получения информации 

program xxx;

      var d, x1, x2, y1,y2 : real;

begin

  write('введите координаты 1 точки: ');

  readln(x1, y1);

  write('введите координаты 2 точки: ');

  readln(x2, y2);

  d: =sqrt(sqr(x2-x1)+sqr(y2-y1));

  write('растояние между точками =', d);

  readln

end.

бег - бог - бок - бак - мак - маг -шаг