Палиндром - QBasic
Формулировка задачи:
Дан одномерный числовой массив размера n. Найти часть массива которая составляет палиндром. Помогите ПЖ!!!
Решение задачи: «Палиндром»
textual
Листинг программы
INPUT n DIM a(n) FOR i = 1 TO n INPUT a(i) NEXT FOR i = 1 TO n FOR j = i TO n f = 0 IF j <> i THEN FOR k = i TO j IF a(k) <> a(j - k + i) THEN f = 1 NEXT IF f = 0 THEN FOR l = i TO j PRINT a(l); NEXT PRINT END IF END IF NEXT
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д