いろんな言語で宿題スレ

いろんな言語で宿題ス ..

165:デフォルトの名無しさん
09/06/14 05:48:29
>>163
% Prolog (カンマを含む整数表示にはなっていない)

namae(['高専卒男','大学学男','大学修治']).
'Salary'([[20,215000],[22,235000],[255000]]).

'問5.1に示す表を表示する'(2) :-
　　namae(L1),
　　'Salary'(L2),
　　length(namae,Len),
　　write_formatted('%20s,%8s,%8s\n',[名前,年齢,初任給]),
　　for(1,N,Len),
　　list_nth(N,L1,_名前),
　　list_nth(N,L2,[_年齢,_初任給]),
　　write_formatted('%20s,%8d,%8d\n',[_名前,_年齢,_初任給]),
　　N=Len,
　　write('\n\nURLﾘﾝｸ(a.pic.to) のような美しい表を作るにはポストスクリプト
命令述語を使う必要がありますね\n').

次ページ