20_09

Write a Prolog program to implement maxlist(List,Max) so that Max is the greatest number in the list of numbers List.

 Source Code :

 

maxlist([H|T],R):-

 length(T,L),

 L>0 ->

 (

  maxlist(T,R1),

  (

   H > R1 ->

     R is H

    ;

     R is R1

  )

 )

 ;

 R is H.

 

Output :

 

Prolog program to implement maxlist(List,Max) so that Max is the greatest number in the list of numbers List

No comments:

Post a Comment

Write a program in C to convert a decimal number to binary using recursion.

 Source code: //Write a program in C to convert a decimal number to binary using recursion. #include<stdio.h> long convertB_to_D(int d...