Рапира и её создатели

[avivanov76]

Маленький такой мейнфреймик только с ценой от $100,000...

Мейнфрейм - это карьерный самосвал. Агат - легковушка. Как их вообще можно всерьез сравнивать?
И $100,000 не дорого для мейнфрейма. В газетах даже удивлялись, что IBM так демпингует.

140 КБ на предприятие с несколькими сотнями человек хватит.

А, так не прав был Билл Гейтс, не 640 а 140 килобайт хватит всем

Давайте на пальцах прикинем. В Рапире целое число может занимать до 128 байт. То есть, на 140 Кб дискету влезет всего несколько тысяч чисел. Допустим, что предприятие - это магазин с несколькими тысячами позиций в продаже. И по каждой позиции надо хранить название, артикул, цену, объем складских запасов, информацию о поставщике. Одной дискеты вам точно не хватит. Отдельный вопрос, как Рапира с ней работать будет. На Агат-7 интерпретатору доступно около 30 Кб ОЗУ.
А уж какое удовольствие будет искать информацию в базе, раскиданной на несколько дискет. Вставил дискету, загрузил базу, поискал, не нашел, вставил другую дискету и так далее...

На Apple ][, кстати, были платы памяти до 3 Мегабайт. Вот как раз для таких целей - работы с таблицами и бухгалтерией.

Как вы себе представляете такое на бейсике, например, Агата? Пишу уже в третий раз люди не могли даже чисел типа 33000 нормально набрать. То, что Вы пишите, - это полная абстракция. Как Вы представляете определение двух длинных переменных и их последующее сложение средствами древнего бейсика?

Что тут представлять-то? Школьник, умеющий складывать в столбик, может написать такую программу, не говоря уже о разработчиках бухгалтерского софта.

10 PRINT "ЧИСЛО 1:": INPUT A$
20 PRINT "ЧИСЛО 2:": INPUT B$
30 LA = LEN(A$): LB = LEN(B$): MX = LA
40 IF LB > MX THEN MX = LB
50 CR = 0: C$ = ""
60 FOR I = 0 TO MX - 1
70 I1 = LA - I: I2 = LB - I: N1 = 0: N2 = 0
80 IF I1 > 0 THEN N1 = VAL(MID$(A$, I1, 1))
90 IF I2 > 0 THEN N2 = VAL(MID$(B$, I2, 1))
100 S = N1 + N2 + CR: CR = 0
110 IF S >= 10 THEN CR = 1: S = S - 10
120 C$ = STR$(S) + C$
130 NEXT I
140 IF CR > 0 THEN C$ = STR$(CR) + C$
150 PRINT "СУММА:",C$

Запас не помешает.

Excel обходится 15 значащими цифрами. Сопроцессор 8087 поддерживает 19 цифр в BCD числах. 1C использует 38-значные числа с фиксированной точкой. Как же они все живут без запаса?

Поделитесь, наконец, сокровенным знанием, кому кроме математиков, занимающимся криптографией или теорией чисел, может реально понадобиться число в несколько сотен знаков? В каких реальных задачах нужен такой запас?

Проверьте синтаксис - в питоне текстовые операции почти всё как в рапире.

А Рапира позволяет вот так выделить слово "hello"?

s = "hello world"
print(s[:6])

Или напечатать десять звездочек вот так?

print("*" * 10)

Или реверсировать строку вот так?

s = "hello world"
print(s[::-1])

Про то, что синтаксис с двоеточием появился в SETL я вообще молчу.

[Advertiser]