challenges

my solutions to various "programming challenge" problems
git clone https://wehaveforgeathome.hates.computer/challenges.git
Log | Files | Refs | LICENSE

002.rexx (141B)


      1 #!/usr/bin/rexx
      2 
      3 i = 1
      4 j = 2
      5 
      6 sum = 2
      7 
      8 do while j <= 4000000
      9   k = i + j
     10   if \(k // 2) then
     11     sum = sum + k
     12 
     13   i = j
     14   j = k
     15 end
     16 
     17 say sum