Вычислить сумму элементов массива, у которых порядковый номер совпадает со значениями - QBasic
Формулировка задачи:
Задана последовательность целых чисел. Выяснить сумму элементов массива,у которых порядковый номер совпадает со значениями.
Решение задачи: «Вычислить сумму элементов массива, у которых порядковый номер совпадает со значениями»
textual
Листинг программы
INPUT "vvedite n"; n DIM a(n) FOR i = 1 TO n PRINT "vvedite"; i; "element"; INPUT a(i) IF a(i) = i THEN s = s + i NEXT FOR i = 1 TO n PRINT a(i); NEXT PRINT PRINT "s="; s
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д