: 3n+1 ( n -- ) begin dup

Question

1 > while dup 2 mod if 3 * 1 + dup . else 2 / dup . then repeat drop ;

: run3n+1 ( n -- ) 1 ?do i 3n+1 cr loop ;

0

07.11.2021

32 просмотра

а гистограммы пока нет и не вижу смысла на форте в этом варианте, вот если куда то назаписывать данных и потом их парсить

0

08.11.2021

В csv формат проще всего. Потом Экселем любым открыл и любуйся

0

08.11.2021

Andrey Smirnov · Accepted Answer

А гистограмму, как в википедии, для визуализации?

0

08.11.2021