儿科护理(医学高级)
导致维生素B12缺乏的主要原因有（）A、孕母缺乏维生素B12B、单纯羊乳喂养C、严重感染D、长期使用广谱抗生素E、未及时添加辅食
题目
导致维生素B12缺乏的主要原因有（）
- A、孕母缺乏维生素B12
- B、单纯羊乳喂养
- C、严重感染
- D、长期使用广谱抗生素
- E、未及时添加辅食
相似问题和答案
第1题：
有一过程如下:
Sub Sub1(m As Integer,total As Long)
Dim i As Integer
total=1
For i=1 To m
total=total*i
Next
End Sub
调用它的事件过程如下:
Private Sub Command1_Click()
Dim tot As Long,a As Integer
a=Val(InputBox("请输入数据"))
Call Sub1(a,tot)
Print tot
End Sub
则输入数据5,运行结果为【 】。
120 解析：考查考生对过程中参数传递方式的掌握情况。本题的难点是实参与形参的传递问题。total按ByRef参数传递。子过程的功能是计算n!,题中输入5,因此5!=120。参数按传值方式传递时,不改变实参中的值;按传地址的方式传递时,实参和形参指向的内容被改变。
第2题：
以下程序的运行结果是
sub（int x,int y,int *z）
{*z=y-x;}
main（）
{ int a,b,c;
sub（10,5,&a）;
sub（7,a,&b）;
sub（a,b,&c）;
printf（"M,M,M＼n",a,b,c）;}
A．5,2,3
B．-5,-12,-7
C．-5,-12,-17
D．5,-2,-7
第3题：
有以下程序：int sub(int n) { return(n/10+n%10); }void main(){ int x,y; scanf("%d",&x); y=sub(sub(sub(x))); printf("%d\n",y);}若运行时输入：4321<回车>，程序的输出结果是。
n/10是求n的去掉个位数上的数字之外的部分，而n%10是求个位数字，所以函数的功能是将去掉个位外的数和个位相加的结果返回。第一次432+1=433,43+3=46,4+6=10.
第4题：
有以下程序：
int sub(int n) { return(n/10+n%10); }
main()
{ int x, y;
scanf("% d", &x);
y=sub(sub(sub(x)));
printf("% d\n", y);
}
若运行时输入：1234＜回车＞，程序的输出结果是【 】。
10 解析：y=sub(sub(sub(x)))=sub(sub(127))=sub(19)=10。
第5题：
A.孕母缺乏维生素B12
B.单纯羊乳喂养
C.严重感染
D.长期使用广谱抗生素
E.未及时添加辅食
第6题：
（12）有下列Sub过程: Sub Sub(x As Single,y As Single) t=x x=t/y y=t Mody End Sub 在窗体上的命令按钮Commandl中，编写下列事件过程，执行该事件过程调用Sun过程，结果是（ ）。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a,b Print a；b End Sub A.1.25 1 B.5 4 C.4 5 D.1 1.25
【解析】本题考查过程的调用，如果用Call语句调用子过程时，实际参数要放在括号中，如果不使用Call子句，则不必使用括号。本题参数调用时是按地址传递，因此Sun过程中变量的值改变也即改变了单击事件中的a、b变量值。
Sun a,b的执行过程是：t=x=5,x=t/y=1.25,y=t Mod y=1。
第7题：
窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（ ）。
A.Private Sub Form1 Click（ ）
End Sub···
B.Private Sub Form1. Click（ ）
End Sub···
C.Private Sub Command1 click（ ）
End Sub···
D.Private Sub Command Click（ ）
End Sub···
B。【解析】窗体单击事件为Form—Click事件。
第8题：
设在工程中定义了下列类型： Type Stutype ino As Integer strname As String*20 Strsex As String*1 Smark As Single End Type在窗体上正确使用这个类型的是下列哪个操作 A. Sub Command1_Click() Dim student As Stutype With student .ino=12 .strname=smith .strsex=男 .smark=89 End With End Sub B. Sub Command1_Click() Dim student As Stutype With student .ino=12 .strname=＂smith＂ .strsex=＂男＂ .smark=89 End With End Sub C. Sub Command1_Click() Dim student As Stutype With Stutype .ino=12 .strname=＂smith＂ .strsex=＂男＂ .smark=89 End With End Sub D. Sub Command1_Click() Dim student As Stutype With student .ino=12 .strname=＂smith＂ .strsex=＂男＂ .smark=89 End student End Sub
【解析】本题考查为记录类型变量student赋值。使用with语句可以对某个对象执行一系列的语句，而不用重复指出对象的名称。其语法如下：
With 记录类型变量
.记录类型变量成员名=要赋的值
...
End With
给记录类型变量中的字符串型成员赋值时要加双引号。
第9题：
以下程序的运行结果是( )。 #include＜iostream.h＞ void sub(int x，int y，int*z) {*Z=y-x；} void main() {int a，b，c； sub(10，5，&a)； sub(7，a，&b)； sub(a，b，&c)； cout＜＜a＜＜“，”＜＜b＜＜“，”＜＜c＜＜endl；}
A．5，2，3
B．-5，-12，-7
C．-5，-12，-17
D．5，-2，-7
解析： 在C++语言中，调用函数不可能改变实参指针变量的值，但可以改变实参指针变量所指变量的值。
第10题：
有如下一个Sub过程： Sub mlt(ParamArray numbers()) n=1 For Each x In numbers n=n*x Next x Print n End Sub 在一个事件过程中如下调用该Sub过程： Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a,b,c,d End Sub 该程序的运行结果为( )。
A．12
B．24
C．36
D．48