09/06/23 05:30:30
>>277
% Prolog
t277 :-
質問文(L),
findall(U,(member(A,L),write(A),nl,get_line(U)),VL),
write_formatted('あなたは%t年生まれの%才で、%tが好きですね\n',VL).
質問文([年齢を入力してください,生まれた年を入力してください,好きな数字を入力してください]).
09/06/23 05:30:30
>>277
% Prolog
t277 :-
質問文(L),
findall(U,(member(A,L),write(A),nl,get_line(U)),VL),
write_formatted('あなたは%t年生まれの%才で、%tが好きですね\n',VL).
質問文([年齢を入力してください,生まれた年を入力してください,好きな数字を入力してください]).