Question

Write a program in Qbasic to accept a string and display the new string by removing the

repetative string

SAMPLE INPUT : COMMITTEE SAMPLE OUTPUT : COMITE​

Answer 1

Answer:

INPUT "ENTER ANY STRING"; S$ FOR I = 1 TO LEN(S$) B$ = MID$(S$, I, 1) C$ = UCASE$(B$) SUB DISP (S$) FOR I = 1 TO LEN(S$) B$ = MID$(S$, I, 1) C$ = UCASE$(B$) FUNCTION DISP$ (S$) FOR I = 1 TO LEN(S$) B$ = MID$(S$, I, 1) C$ = UCASE$(B$)

Explanation:

i hope it helps