```c / zig + lisp like (fn main (argc :i32 argv :[str]) (v :i32) ( (set message (concat "hello " (get argv 1) " !\n" )) (write :std message) (set v 0))) ``` ```c + zig like i32 main(i32 argc, str[] argv) { str message = concat("hello ", argv[1], " !\n"); write(:std, message); return 0; } ``` ```lisp like (set message (concat "Hello " (get argv 1) " !\n")) (write 0 message) ``` ```forth + lisp / var'aq like "Hello " argv shatter strtie " !\n" strtie disp ``` ```fortran c / zig + fortran like program main { str message = concat("hello ", argv[1], "! \n") write(0, "%s", message) } ```