> (setq x 2)
> (defun sqr (x)
>   (* x x))
> (setq y (sqr x))

LISPうぜえ
男ならFORTRAN

参考：2000/10/09(月)06時34分48秒