Informatica de gestiune (limbaje)

1. Secventa urmãtoare de comenzi:
If A < B then
C=B-A
Else
If A=B then
C=0
Else
C=A-B
Print “C=”,C
End If
End If pentru A=7 si B=10 afiseazã:
A) C=3
B) C=0
C) C=7
D) nu afiseazã nimic
E) C=10

Răspuns corect: D

2. Sã se stabileascã care variantã este corectã pentru urmãtoarea secventã de program scrisã pentru problema: pentru o lista cu n produse sã se determine si sã se afiseze valoarea medie a produselor având ca date de intrare cantitatea – cant si pretul unitar - pretu.
A) n = InputBox(“Numarul produselor: ”) valmed = 0
For i = 1 To n-1 cant = InputBox(“Cantitatea:”) pretu = InputBox(“Pretul unitar:”) valmed = valmed + cant * pretu
Next i
Print “Valoarea medie este “, valmed
B) n = InputBox(“Numarul produselor: ”) valmed = 0
For i = 1 To n cant = InputBox(“Cantitatea:”) pretu = InputBox(“Pretul unitar:”) valmed = valmed + cant * pretu
Print “Valoarea medie este “, valmed
C) n = InputBox(“Numarul produselor: ”) valmed = 0
For i = 0 To n-1 cant = InputBox(“Cantitatea:”) pretu = InputBox(“Pretul unitar:”) valmed = valmed + cant * pretu
Next i
Print “Valoarea medie este “, valmed/n
D) n = InputBox(“Numarul produselor: ”) valmed = 1
For i = 1 To n cant = InputBox(“Cantitatea:”) pretu = InputBox(“Pretul unitar:”) valmed = valmed + cant * pretu
Next i
Print “Valoarea medie este “, valmed
E) n = InputBox(“Numarul produselor: ”) valmed = 0
For i = 1 To n+1 cant = InputBox(“Cantitatea:”) pretu = InputBox(“Pretul unitar:”) valmed = valmed + cant * pretu
Next i
Print “Valoarea medie este “, valmed

Răspuns corect: C

3. Se doreste achizitionarea unei cantitãti (cant) dintr-un produs având la dispozitie o listã cu 10 variante de pret. Care dintre urmãtoarele secvente calculeazã si afiseazã suma cheltuitã pentru achizitionarea produsului la pret mediu?
A) x = InputBox(“cant=”) y=0
For i = 0 to n z = InputBox(“z=”) y = y + z
Next i
MsgBox x * y / (n+1)
B) x = InputBox(“cant=”) y=0
For i = 1 to 9 z = InputBox(“z=”) y = y + z
Next i
MsgBox x * y / 10
C) x = InputBox(“cant=”) y=0
For i = 0 to 9 z = InputBox(“z=”) y = y * z
Next i
MsgBox x * y / 10
D) x = InputBox(“cant=”) y=0
For i = 0 to 9 z = InputBox(“z=”) y = y + z
Next i
MsgBox x * y / 10
E) x = InputBox(“cant=”) y=0
For i = 0 to 9 z = InputBox(“z=”) y = y + z
Next i
MsgBox x + y / 10

Răspuns corect: D

4. Ce afiseazã urmãtoarea secventã de program Visual Basic x = 10 y = 5
Select Case x - y
Case Is > 0 z = x - y
Case Is = 0
Print "nul"
Case Else
Print "negativ"
End Select
A) nul
B) negativ
C) pozitiv
D) nu afiseazã nimic
E) 5

Răspuns corect: D

5. Se doreste achizitionarea unei cantitãti (cant) dintr-un produs având la dispozitie o listã cu 10 variante de pret. Care dintre urmãtoarele secvente calculeazã si afiseazã suma cheltuitã pentru achizitionarea produsului la pret minim?
A) x = InputBox(“x=”) y=InputBox(“Prima varianta de pret: “)
For i = 0 to 8 z = InputBox(“z=”) if z > y Then y = z
End If
Next i
MsgBox x * y
B) x = InputBox(“cant=”) y=InputBox(“Prima varianta de pret: “)
For i = 0 to 8 z = InputBox(“z=”) if z < y Then y = z
End If
Next i
MsgBox x * y
C) x = InputBox(“cant=”) y=InputBox(“Prima varianta de pret: “)
For i = 0 to 9 z = InputBox(“z=”) if z > y Then y = z
End If
Next i
MsgBox x * y / 10
D) x = InputBox(“cant=”) y=InputBox(“Prima varianta de pret: “)
For i = 0 to 9 z = InputBox(“z=”) if z < y Then y = z
End If
Next i + 1
MsgBox x * y
E) x = InputBox(“cant=”) y=InputBox(“Prima varianta de pret: “)
For i = 1 to 9 z = InputBox(“z=”) if z > y Then y = z
End If
Next i
MsgBox x * y

Răspuns corect: B

6. Se considerã secventa de program Visual Basic
C = A - B
Select Case C
Case Is < 0
C = C + A
Case Is > 0
C = C - B
Case 0
C = 100
End Select
Print "C=", C
Ce afiseazã pentru A=10 si B=5?
A) 100
B) 10
C) 0
D) 5
E) nu afiseazã nimic

Răspuns corect: C

7. Executarea unui proiect VB se poate face astfel:
1. prin butonul Start din bara de instrumente
2. prin apasarea tastei F4
3. prin optiunea Start a meniului Run

...

+ încă 131 de întrebări.

Statistica pe care o oferă programul Nota 10 (zece) despre această grilă rezolvată: