Механический компьютер считает квадратный корень
А вот так выглядит программа:
А вот так выглядит программа:
Промежуточные результаты, он печатает результат каждой математической операции. Это можно отключить, так, чтобы он печатал только исходное число, и рядом квадратный корень из него - но для съёмки видео я этого делать не стал, чтобы вышло более зрелищно.
Спасибо. Я начал общение с компьютерами уже во времена перфокарт и перфолент. Мы не страдали так из-за количества вычислений. )))
И программы вообще не оптимизировали, да? ;- ).
На самом деле, тут проблема в том, что у Аскоты, по ряду причин, нет команды сдвига числа на разряд. А без них умножение и деление превращается в ужас - даже в этом алгоритме половину программной памяти занимают три команды сдвига влево, а большая часть проблем оптимизации возникла из-за того, что они в память не влезали.
Интересно если отправится во времена этих машин и достать современный смартфон, на костре сожгут как могущественного колдуна?
Алгоритм Герона для квадратного корня? Или общий случай метода итераций?
Что там в "памяти команд", назовём её так, забито?
Алгоритм Фрайдена, :- ).
https://alple.net/arif-ru/use.htm#sqr
Алгоритм Герона требует слишком много умножений и делений, Аскота их не любит.
Работает в машинных кодах. Дума ещё нет, но описание ассемблера уже готово, так что можете заняться портированием.
На самом деле, если почитать инструкции по ремонту и наладке, то становится понятно, что устроена она очень логично и, в основе своей, удивительно просто. Но, конечно, глядя не на чертежи, а на собранную работающую машину, осознать это сложно.
Эту идею можно реализовать на гораздо более простой и распространённой машине, :- ).
https://pikabu.ru/story/delenie_na_nol_na_mekhanicheskom_kal...
В статье будет мало фоток и много технического текста. Я, конечно, могу её на Пикабу перепостить, но, мне кажется, тут это будет неформат.
Где ленту взял? с год назад весь инет облазил так и не нашел где купить за адекватные деньги в итоге товарищ спиздил выменял у завхоза в госконторе.
Красящую? Оригинальная жива осталась. Подсохла, конечно, но на неё во время смазывания масло попало, и лента оклемалась.
Боже,какая я древняя!!! Я работала на похожих,на Роботронах, в Госбанке СССР еще в 1980х.!!! И умела даже по альбомам программы составлять (вставлять "стопсы"-маленькие железочки- они так правильно называются) в шины (большие штуки с дырочками) с помощью специальных щипцов-отверток (учили в техникуме,отдельный предмет был,пятерка в красном дипломе за него). А когда работать в банк пришла ,то узнала,что они шины для программирования в Москву отвозят,в областную контору Госбанка. Я говорю,зачем возить, тяжелая штука ( а возили своим ходом на электричке молодые девчонки), можно самим на месте делать,только альбом нужен. На меня посмотрели,как на ненормальную,сказали,что всю жизнь в Москву возили,возят и будут возить.И чтобы я к шинам не прикасалась!И запасные шины с разными программами хранились в узком высоком шкафу.А таких машин у нас было штук 7-8,по-моему. Была отдельная комната,где они все стояли,называлась машинным отделом. Грохот стоял неимоверный,когда на них одновременно работало несколько человек. Это было до перехода на вычислительный центр,когда мы сами баланс в отделении делали. На них проводились операции по лицевым счетам клиентов. И зарплату начисляли работникам банка. И на каждом столе в операционном отделе стояли машины поменьше(аналог калькуляторов современных),тоже электромеханические,тоже немецкие, с узкой бумажной лентой (как сейчас чековая лента в магазинах),чтобы можно было результат подсчета подкалывать к документам. И как мы сопротивлялись,когда появились первые компьютеры... Как они нам были не нужны...
Здорово! Спасибо за историю!
Вы, наверное, как раз на таких работали. В 1978 году Robotron поглотил Astra-Werke, и на шильдиках Ascota-170 появилась надпись "Robotron", как на моей.
Блин, это же офигенно! Даже у Сергея Фролова такого нет! Тоже занимаюсь своего рода даунгрейдом по персоналкам 80-х, но даже мне до такого изврата далеко... Из механических компьютеров вспоминается только Аналитическая машина Бэббиджа. Интересно, как в этом аппарате осуществляется хранение промежуточных результатов? Ну и запрограммировать такое было явно не самым простым делом.
Сергей отечественную технику любит, а это – ГДР.
У неё, условно говоря, есть шина данных, и больше полусотни регистров памяти в виде рядов шестерёнок, угол поворота которых задаёт цифры. По команде нужный ряд шестерёнок подключается к шине данных, соответственно. И либо поворачивает свои шестерёнки до нуля, двигая рейки шины, либо, наоборот, двигается вслед за шиной.
Ну, вручную это будет неинтересно, буду тупо жать на одну клавишу, и всё.
А писать, отлаживать и запускать полноценную программу для деления - это ещё неделя плотной работы, делать которую мне лень.
Не смотря на ваш ответ, деление на ноль именно этой машины тоже интересно. С печатью промежуточных результатов)
А за столько он этот корень без печати промежутков посчитает?
> А за столько он этот корень без печати промежутков посчитает?
Ровно за столько же, :- ). "Отключение печати" просто предотвращает удар молоточками по печатающим штангам в определённой точке вычислительного цикла. В остальном процесс будет выглядеть так же, разве что прокручивание каретки можно заодно отключить.
Неа. Никто не берётся, :–(. Потихоньку продолжаю искать специалиста.
А что в посте писать? Про IBM XT только ленивый не писал, что я добавить смогу?
Времени много прошло,конечно,но модель другая была ,насколько я помню. Знала бы,что пригодится,фото бы сделала в свое время.Но это и не важно. Было приятно молодость вспомнить.
Вроде, Роботрон ничего другого не выпускал. Другое дело, что Аскоты выпускались в разных корпусах и с немного разным набором функций. Вот тут можете на фотографии разных версий посмотреть:
http://www.robotrontechnik.de/index.htm?%2Fhtml%2Fcomputer%2...
Окай, в субботу пойду в аскотную наберу.
Есть один нюанс, я аскоту видел только в разворованом состоянии, и не знаю какие номера имеют эти "зубы". Чтобы я не лез искать в документацию, опишите нужные вам номера.
Моя почта egorovsobaka(значёк собаки)gmail.com
У меня их ведро, я из Николаева, могу выслать.
Плюс запчасти. Может если поискать, то и зипы найду. В аскотную лет пять не заходил.
О, а вышлите, пожалуйста! Пересылку и ваши хлопоты оплачу.
Особенно №9 и №10 интересуют. Да и №3 уже кончаться начали...
почта me собака alple.net
1.414213562373, и так далее. Компьютер считает медленно, поэтому поставил ему для видео ограничение в пять цифр.
Или вопрос о нуле в конце? Он не значащий, это не цифра расчёта, а просто технический нолик.
Увы, в лёгком доступе только примерные схемы. Да и точности и прочности нити fdm, боюсь, не хватит.
Не, там проверка на точный результат есть, так что корень из четырёх посчитает за несколько секунд.
Ну, я живу в глухих уральских ебенях, и то у нас в магазинах офисной техники есть лента для матричных принтеров. И даже двухцветная попадалась... лет 7 назад (потом матрас раритетчикам подарил, и к расцветке лент больше не присматривался). Отличие от оригинальной ленты для пишущих машин - только в более тонкой ткани основы.
Эту идею можно реализовать на гораздо более простой и распространённой машине, :- ).
https://pikabu.ru/story/delenie_na_nol_na_mekhanicheskom_kal...
