九九C

因みに、当然ながらCで九九を書けばこんな感じ

#include<stdio.h>

int main(){
	int i,j;

	for(i = 1; i <= 9; i++){
		for(j = 1; j <= 9; j++)
			printf("%3d  ", i*j);
		printf("\n");
	}

	return 0;
}

ちゃんと桁数処理もしてあります

Haskellで九九を書きなおした

main = putStr $ unlines $ map show $ map (kuku []) [1..9]
        where
        kuku xs k = if length xs == 9
                        then xs
                        else kuku (xs++[k*(length xs + 1)]) k

前より引数の数を減らしてみた