aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2025-08-11 18:05:26 -07:00
parent 4d5544505c
commit 4924dd0264
3073 changed files with 55820 additions and 4408 deletions
Download patch file Download diff file Expand all files Collapse all files

10
Task/Square-form-factorization/REXX/square-form-factorization.rexx
View file

@ -1,4 +1,4 @@
-- 8 May 2025
-- 28 Jul 2025
include Settings
numeric digits 40
@ -25,7 +25,7 @@ test.0 = i-1
return
Selected:
procedure expose mult. test. glob.
procedure expose mult. test. Memo.
call Time('r')
say 'Find a factor for 28 selected numbers...'
do t = 1 for test.0
@ -55,7 +55,7 @@ say
return
Randomized:
procedure expose mult. glob.
procedure expose mult. Memo.
say 'Find a factor for 28 random numbers...'
x = 0
do until x = 28
@ -89,6 +89,4 @@ end
say
return
include Numbers
include Functions
include Abend
include Math