16- خروجی الگوریتم زیر چیست؟
شروع
1 ←I
مادامیکه I ≤ 99 کارهای زیر را تکرار کن
{
] [ ← K
]*10 [- I ← M
اگر K=M آنگاه I را چاپ کن
I+1 ← I
}
پایان
1) اعداد دو رقمی 2) اعداد دو رقمی زوج
3) اعداد دو رقمی بخشپذیر بر 10 4) اعداد دو رقمی با ارقام مساوی
17- در برنامه برای استفاده از طرح های آمادهی متحرک سازی، از کدام گزینهی زیر استفاده می شود؟
1) Slid Sorter 2) Custom Animation
3) Animation Schemes 4) Color Schemes
18- خروجی الگوریتم زیر کدام است؟
شروع
برای A از 1 تا 1000 کارهای زیر را تکرار کن
}
A← X و 0← C و 1← K و 0 ← H
X mod 2 2 ←p
x\2 ←x
c+p*k←c
k*10←k
اگر p>0 بود آنگاه H+1←H
اگر x<>0 آنگاه برو به 2
اگر H=1 آنگاه A را چاپ کن
{
پایان
1) 2-4-6-8-. . .-996-998 -1000 2) 1-2-4-8-16 - . . . – 128-256-512
3) 1-4-9-16-25-36- . . . 4) 1-3-5-7-9-11-13-. . .
19- مقدار متغیرهای A و B پس از اجرای قطعه کد مقابل چیست؟
Private Sub Command1_Click()
Dim A, B As Integer
A = 12.8
B = 13.2
Print "A="; A, "B="; B
End Sub
1) A=12.8 B=13.2 2) A=13 B=13
3) A=12.8 B=13 4)A=12 B=13.2
20- خروجی قطعه برنامهی مقابل چیست؟
Private Sub Command1_Click()
For i = 2 To 5
For K = -1 To -7 Step -2
For j = 9 To 1 Step 3
Next j, K, i
s = i + K + j
Print s
End Sub
1) -3 2)6 3)24 4) 7
21 - ...
22- اگر در text1 مقدار 1234 باشد خروجی کدام است؟
Private Sub Command1_Click()
a = 0: b = 0: c = 0
Select Case Right(Left(Text1.Text, 2), 1)
Case 1
a = 1
Case 2
b = 1
Case 3
c = 1
Case Else
a = 1: b = 1: c = 1
End Select
r = a * 100 + b * 200 + c * 300
Print r
End Sub
1) 100 2) 200 3)300 4)600
23- پس از اجرای قطعه برنامه زیر خروجی را تعیین کنید.
Private Sub Command1_Click()
Dim a(5) As Integer
a(1) = 1
For i = 2 To 5
a(i) = a(5 - i) + a(i - 1)
Print a(i)
Next i
End Sub
1)1 2 3 4 2) 1 2 3 5 3) 1 2 3 3 4) خطا می گیرد
24- پس از دوبار، کلیک کردن روی فرم مقدار متغیر X کدام است؟
Dim C As Integer
Private Sub Form_click()
Static A As Integer
Dim B As Integer
A = A + 1
B = B + 2
C = C + 3
X = A + B + C
End Sub
1)6 2) 12 3) 7 4) 10
25- پس از اجرای قطعه کد زیر کدام گزینه بر روی فرم نمایش داده می شود.
x = -5
Do
While x <= 0
s = s + x
x = x + 3
Wend
x = x - 2
Loop Until x >= 0
Print s
1) -8 2) -7 3)-6 4) -5
جواب بصورت نقل قول