福野泰介の一日一創

鯖江発の産業をいかに世界へと広がるか？鯖江商工会議所、国際化委員会、懇親会ではBASICが話題！
生まれた曜日を計算するプログラムを作ったと、シャルマン 社長 宮地さんと、加藤吉平商店 当主 加藤さん！
何十年経っても色褪せない、プログラミング体験のインパクトがすごい！この体験を現代の子供達にも！

10 LET[0],"SUN","MON","TUE","WED","THU","FRI","SAT" 20 INPUT"Y?",Y 30 INPUT"M?",M 40 INPUT"D?",D 50 IF M<3 M=M+12:Y=Y-1 60 H=(Y+Y/4-Y/100+Y/400+(13*M+8)/5+D)%7 70 ?STR$([H])

こちらが、曜日を計算する「ツェラーの公式」
閏年を含めて、きちんとこれで求まってしまうことがおもしろい！

IchigoJamプリント化したものはこちら。

「なんようびうまれ？」(PDF)

Think globally, act locally! 攻める、鯖江商工会議所！