Here is what I have so far, I have a loop missing though i do not know what to put there as of yet. Any help would be greatful!Main Module<br />Declare Currency Type as Integer<br />Declare Foreign Currency as Real<br />Declare US Dollar as real<br />Do while User continues<br />Call Display Menu Module<br />Call Get Foreign Currency Value Module<br />Call Convert Currency Module<br />Call Display Results Module<br />End Loop<br />End Main Module<br />Display Menu Module<br />Loop goes here Not sure about it though??<br />Display "Currency Converter"<br />Display "Select a Currency"<br />Display "1 Canadian Dollars"<br />Display "2 Mexican Pesos"<br />Display "3 English Pounds"<br />Display "4 Japanese Yen"<br />Display "5 French Francs"<br />Display "6 Done"<br />Input Foreign Currency Type<br />if Foreign currency type ≤ 5 continue to Calculate Rate<br />Else <br />display "Invalid Data Type Please Select again"<br />End if<br />End Display Menu Module<br /><br />Get Foreign Currency Value Module<br />Display " Enter a Currency value (0-100,000)"<br />Input Foreign Currency value<br />if Foreign Currency Value <0 or Foreign Currency Value >100,000<br />Else Display "Invalid Entry, Please try again"<br />End Get Foreign Currency Value Module<br />Convert Currency Module<br />Select Foreign Currency Type<br />Case 1: Canadian<br />Set Rate= 1.4680<br />Case 2: Mexican<br />Set Rate= 9.5085<br />Case 3: English<br />Set Rate=1.6433<br />Case 4: Japanese<br />Set Rate = 104.9200<br />Case 5: French<br />Set Rate = 6.2561<br />US Dollar Value=Foreign Currency Value*Rate<br />End Convert Currency<br />Display Results<br />Declare Currency as String<br />Case 1: Canadian<br />Currency="Dollars"<br />Case 2: Mexican<br />Currency="Pesos"<br />Case 3: English<br />Currency="Pounds"<br />Case 4: Japanese<br />Currency="Yen"<br />Case 5: French<br />Currency="Francs"<br />Display" The Value of Foreign Currency Value" is "US Dollar Value" "Dollars"<br />End Display Results <br />
</div>
</div>