Дан одномерный массив вещественного типа состоящий из n элементов. Найти в массиве третий считая слева направо, элемент, имеющий заданное значение x

code: #basic
INPUT" vvedite kol-vo elementov ",n
DIM a(n)
FOR i=1 TO n
INPUT"vvedite element ",a(i)
NEXT
INPUT"vvedite chislo",x
FOR i=1 TO n
IF a(i)=x THEN k=k+1:IF k=3 THEN PRINT "nomer elementa=";i
NEXT
IF k<3 THEN PRINT"net takogo elementa"

автор: кот Бегемот

Поделиться:

Похожие статьи: