| Эта статья поднимает множество проблем. Пожалуйста помоги Улучши это или обсудите эти вопросы на страница обсуждения. (Узнайте, как и когда удалить эти сообщения-шаблоны) | Тема этой статьи может не соответствовать Википедии общее руководство по известности. Пожалуйста, помогите установить известность, указав надежные вторичные источники которые независимый темы и предоставить подробное ее освещение, помимо банального упоминания. Если известность не может быть установлена, статья, вероятно, будет слился, перенаправлен, или же удалено. Найдите источники: Язык программирования "Бэббидж" – Новости · газеты · книги · ученый · JSTOR (Октябрь 2011 г.) (Узнайте, как и когда удалить этот шаблон сообщения) |
| Эта статья слишком полагается на Рекомендации к основные источники. Пожалуйста, улучшите это, добавив вторичные или третичные источники. (Октябрь 2011 г.) (Узнайте, как и когда удалить этот шаблон сообщения) |
(Узнайте, как и когда удалить этот шаблон сообщения) |
Бэббидж это язык ассемблера высокого уровня для GEC 4000 серии миникомпьютеры.[1] Он был назван в честь Чарльз Бэббидж, английский пионер вычислительной техники.
Пример
ПРОЦЕСС ГЛАВА FACTORIALENTRY LABEL ENTRYPOINTLITERAL TO = 4 // Предположим, что используется форма по умолчанию EXTERNAL ROUTINE OPEN, PUT, CLOSE, TOCHARVECTOR [0,19] OF BYTE ANSWER = "factorial x = xxxxxx" HALF COUNTHALF VALUEFULL RES ************************************************* ********************** ОБЫЧНЫЙ ФАКТ (ЗНАЧЕНИЕ) // вернуть факториал RA. VALUE => RESULT WHILE DECREMENT VALUE GT // 0 // DO << RESULT * VALUE => RESULT >> RETURN (RESULT) END // ******************* ************************************************* ********* ENTRYPOINT: OPEN (TO, 1) // Распечатать факториалы для чисел от 1 до 9 1 => RA REPEAT << RA => COUNT FACT (RA) => RA TOCHAR (RA, 7, ANSWER + 13) TOCHAR (COUNT, 2, ANSWER + 9) PUT (TO, 20, ANSWER) COUNT + 1 => RA >> WHILE RA LT 10 CLOSE (TO) STOP (0) END // ***** ************************************************* ***********************
Смотрите также
Рекомендации