Task3.7

% Составить программу для выбора наибольшего из трех введенных чисел.

max(A, B, A):- A >= B, !.
max(_, B, B).
maximum(A, B, C):- max(A, B, Max1), max(Max1, C, Max), write("max="), write(Max), nl.