Рисунок 15.2. Числа в треугольнике.
Тема. Напишите программу, которая отображает целые числа на плоскость некоторым регулярным образом и отмечает на рисунке места, где находятся простые числа. Выведите формулы, описывающие прямые линии на вашем рисунке, и напечатайте те из них, которые особенно изобилуют простыми числами; печатайте также долю простых чисел на этих прямых. Обеспечьте высокую эффективность ваших программ проверки целых чисел на простоту, так чтобы вам хватило времени для анализа весьма отдаленных отрезков натурального ряда.
Инструментовка. Для решения этой задачи больше всего подходит алгебраический язык, У вас должна быть возможность управлять эффективностью проверки на простоту.
Длительность исполнения. Одному исполнителю на 2 недели.
Гарднер (Gardner M). Mathematical Games. Scientific American, pp. 120-126, March 1964. [Имеется перевод: Гарднер М. Математические досуги. — М.: Мир, 1972, с. 410.]
Гаусс (Gauss С. F.). Disquisitiones Arithmeticae. Yale University Press, New Haven, CT, 1965.
По теории чисел написаны сотни книг. Но, как это ни странно, одна из первых книг по-прежнему остается одной из лучших. Помимо прочих достоинств она вышла в дешевом издании. Так почему бы не посоветоваться с классиком?
Штейн, Улам, Уэллс (Stein M. L, Ulam S. M., Wells M. В.). A Visual Display of Some Properties of the Distribution of Primes, American Mathematical Monthly, pp. 516–520, May 1964.
Гарднер излагает результаты Штейна, Улама и Уэллса более популярно, тем не менее обе работы легки для чтения. На эту тему почти ничего больше не написано, так что это, вероятно, увлечение Улама. Идея получать с помощью простых чисел красивые картинки позволяет убить лишнее машинное время, и, не исключено, что в этом все же что-то есть.
16.
Горючие слезы,
или Учет расхода бензина
Тридцать центов за галлон — дело прошлое. Сорок центов за галлон — дело прошлое. Пятьдесят центов за галлон — дело прошлое. Сейчас[22] галлон бензина стоит шестьдесят центов, и, возможно, вскоре мы останемся вообще без горючего. Так что на повестке дня — анализ индивидуального расходования бензина.
Многие ведут журнал покупок бензина. Обычно туда записывают дату, показания счетчика пройденного пути, марку бензина, цену одного галлона, сколько галлонов куплено и общую стоимость. Три последние величины зависят друг от друга; эта зависимость не совсем точная из-за ошибок округления, но ее все же можно использовать для проверки правильности исходных данных. С помощью ЭВМ вы можете получить разнообразную статистическую информацию. Интересно вычислить такие производные величины, как средняя стоимость одного галлона, средний пробег на галлон, средний пробег за день, средняя стоимость пробега в одну милю, среднее время расходования одного галлона. Кроме того, хорошо было бы получить такую же информацию по каждой марке бензина и посмотреть, есть ли разница между марками. Таблица 16.1 — фрагмент реального журнала покупок бензина[23].
| Таблица 16.1. Выдержка из реального журнала покупок бензина | |||||
| Дата | Марка бензина | Пробег (в милях) | Цена галлона (в центах) | Количество галлонов | Сумма |
| 03/27/74 | Texaco | 24 370 | 59.9 | 13.5 | $8.00 |
| 04/05/74 | Texaco | 24 434 | 59.9 | 5.5 | $3.30 |
| 04/11/74 | Texaco | 24 596 | 59.9 | 8.2 | $4.88 |
| 04/23/74 | Mobil | 24 862 | 58.8 | 12.9 | $7.60 |
| 05/13/74 | Mobil | 25 057 | 61.9 | 13.9 | $8.60 |
| 06/11/74 | Arco | 25 239 | 62.9 | 12.5 | $7.85 |
| 07/12/74 | Texaco | 25 435 | 63.3 | 14.2 | $8.90 |
| 07/19/74 | Chevron | 25 713 | 58.8 | 12.4 | 87.27 |
| 07/28/74 | Mobil | 26 135 | 60.9 | 14.1 | $8.60 |
| 08/07/74 | Arco | 26 384 | 60.4 | 13.1 | $8.00 |
| 08/08/74 | Chevron | 26 712 | 59.9 | 13.3 | $7.90 |
| 08/16/74 | Arco | 26 997 | 60.9 | 13.6 | $8.30 |
| 08/22/74 | Mobil | 27 068 | 60.9 | 4.0 | $2.45 |
| 08/22/74 | Shell | 27 362 | 61.6 | 11.8 | $7.25 |
| 08/23/74 | Shell | 27 606 | 63.4 | 10.3 | $6.54 |
| 08/25/74 | Ericson | 27 913 | 60.9 | 13.6 | $8.29 |
| 08/26/74 | American | 28 163 | 60.9 | 10.8 | $6.55 |
| 08/26/74 | American | 28 487 | 57.9 | 14.0 | $8.10 |
| 08/27/74 | DX | 28 771 | 53.9 | 12.2 | $6.60 |
| 08/28/74 | Conoco | 29 114 | 59.9 | 14.8 | $8.90 |
| 08/28/74 | Texaco | 29 337 | 58.9 | 10.2 | $6.00 |
| 08/28/74 | Phillips | 29 661 | 60.9 | 13.9 | $8.35 |
| 08/29/74 | Chevron | 29 912 | 65.9 | 10.8 | $7.10 |
| 08/29/74 | Shell | 30 147 | 65.9 | 10.3 | $6.70 |
| 08/30/74 | Texaco | 30 317 | 60.9 | 7.6 | $4.60 |
| 08/31/74 | Exxon | 30 643 | 56.9 | 13.3 | $7.60 |
| 09/06/74 | Shell | 30 878 | 59.9 | 13.2 | $7.90 |
| 09/10/74 | Shell | 31 182 | 59.9 | 13.0 | $7.80 |
| 09/14/74 | Exxon | 31467 | 57.9 | 13.1 | $7.60 |
| 09/18/74 | Arco | 31 711 | 57.9 | 10.1 | $5.85 |
| 09/24/74 | Arco | 31 984 | 57.9 | 12.5 | $7.25 |
| 09/27/74 | Arco | 32 225 | 57.9 | 9.9 | $5.70 |
| 10/01/74 | Arco | 32 455 | 57.9 | 9.8 | $5.65 |