Logo

Programming-Idioms

This language bar is your friend. Select your favorite languages!
  • Scheme
(for-each (lambda (x) (display "Hello\n")) (iota 10))

Chez Scheme
(do ((i 0 (+ i 1)))
    ((= i 10))
  (display "Hello")
  (newline))
(define (hellos i)
        (if (> i 0)    
            (begin
                (display "Hello")
                (newline)
                (hellos (- i 1)))))
(hellos 10)
with Ada.Text_IO;
use Ada.Text_IO;
for I in 1 .. 10 loop
  Put_Line ("Hello");
end loop;

New implementation...
< >
programming-idioms.org