求助：已知数组a，输入一个数据x，在数组a中找出第一个与x相等的元素并将其下标输出，若不存在这样的元素，则输出“Not found!”标志。 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 求助：已知数组a，输入一个数据x，在数组a中找出第一个与x相等的元素并将其下标输出，若不存在这样的元素，则输出“Not found!”标志。

标题：求助：已知数组a，输入一个数据x，在数组a中找出第一个与x相等的元素并将其 ...

只看楼主

c530837027

等　级：新手上路
帖　子：41
专家分：0
注　册：2011-12-8
结帖率：85.71%

楼主

已结贴√ 问题点数：20 回复次数：1

求助：已知数组a，输入一个数据x，在数组a中找出第一个与x相等的元素并将其下标输出，若不存在这样的元素，则输出“Not found!”标志。

clear
input "n=" to n

dimension a(n)

FOR i=1 TO n
   input"请输入值" to a(I)
ENDF
input "请输入x的值:" to x
for i=1 to n
IF a(i)= x
   ?i
   exit
   endif
   endfor
if a(i) !=x
    ?"not found"
    endi

我编的是这个好像哪错了。。。？？求请教

搜索更多相关主题的帖子: 元素　

2011-12-22 19:36

茵梦湖

等　级：贵宾
威　望：31
帖　子：545
专家分：2180
注　册：2009-4-25

第 2 楼

得分:20

见红字部分~

clear
input "n=" to n

dimension a(n)

FOR i=1 TO n
   input"请输入值" to a(I)
ENDF
input "请输入x的值:" to x
for i=1 to n
   IF a(i)= x
      ?i
      exit
   endif
endfor
if i>n
   ?"not found"
endi

2011-12-22 22:23

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-358406-1-1.html