Дан одномерный массив вещественного типа состоящий из n элементов. Найти в массиве третий считая слева направо, элемент, имеющий заданное значение x
Категория: Basic
2011-10-31 14:34:51
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"
автор: кот Бегемот
Поделиться: