Book of tasks on programming. Old version

 

 by Aliaksandr N. Prykhodzka

 

stack, Internet, online, сборник, vector, class, editor, not, procedure, var, education, ряд, справка, абстрактный, константа, сети Петри, visual basic, table
 

Pascal. Answers. Pc.7. Algorithms. Numerations



главная страница


Pc.7.1

Шаг 1. В I1 заносим первое исходное число. В I2 заносим второе исходное число.
Шаг 2. K=(I1+I2)*(I1+I2).
Шаг 3. R=(3*I1+I2).
Шаг 4. K=K+R.
Шаг 5. Находим частное от деления K на 2. Это и есть результат.
Шаг 6. Конец.



Pc.7.2

Шаг 1. Заносим в J исходное число.
Шаг 2. BB=8*J+1.
Шаг 3. В BBB извлекаем квадратный корень (целое число) из BB.
Шаг 4. BBBAB=BBB+1. BBBSB=BBB-1.
Шаг 5. В переменную CA заносим частное от деления BBBAB на 2. В переменную CS заносим частное от деления BBBSB на 2.
Шаг 6. D=CA*CS.
Шаг 7. В переменную E заносим частное от деленияD на 2
Шаг 8. I1=J-E. I2=CS-1.
Шаг 9. Результирующая пара чисел есть (I1,I2). Конец.



Pc.7.3

Шаг 1. В переменную Q2 заносим последнее число исходной последовательности
Шаг 2. Повторяем в цикле Шаги 3, 4, 5, пока не дойдем до начала последовательности.
      Шаг 3. В переменную Q1 заносим предыдущий элемент последовательности.
      Шаг 4. Строим канторовский номер (смотри алгоритм P.49.1.) для пары чисел (Q1,Q2) и результат заносим в Q3.
      Шаг 5. Q2=Q3.
Шаг 6. В Q1 заносим длину исходной последовательности минус 1.
Шаг 7. Строим канторовский номер для пары чисел (Q1,Q2). Это и есть результат.
Шаг 8. Конец.



Pc.7.4

Шаг 1. Для исходного числа находим канторовскую пару чисел. Результат заносим в переменные L1 и L2.
Шаг 2. LLL=L1+1. Значение LLL определяет число элементов результирующей последовательности чисел.
Шаг 3. Проходим переменной K по всем значениям от 1 до LLL-1 и для каждого значения K выполняем Шаги 4, 5, 6.
      Шаг 4. Строим по номеру L2 канторовскую пару чисел (LL1,LL2).
      Шаг 5. Добавляем к результирующей последовательности чисел число LL1.
      Шаг 6. L2=LL2.
Шаг 7. Добавляем к результирующей последовательности чисел число L2.
Шаг 8. Конец.

 

©   Aliaksandr Prykhodzka    1993 - 2007