Chapter 4, ex 5

---
// ch04_ex05.java
class ch04_ex05 {
  public static void main(String[] args) {
    String ar[] = new String[10];
    for (int i = 0; i < ar.length; i++) {
      ar[i] = new String( "i = " + i );
    }
    for (int i = 0; i < ar.length; i++) {
      System.out.println( "ar[" + i + "] = " + ar[i] );
    }
  }
}
---

---
;;;; chapter 4, ex 5
(let ((ar (make-array 10 :element-type 'string)))
  (loop for i below (length ar) do
	(setf (aref ar i) (format nil "i = ~d" i)))
  (loop for i below (length ar) do
	(format t "ar[~d] = ~a~%" i (aref ar i))))
---

links: digg this    del.icio.us    technorati    reddit