WAP to compare two strings

Write a program to compare two strings without using string function Output Enter two strings :nawarajshahstr1 < str2 alphabetically