Informatica de gestiune

1. Ce permite o interogare in Access? O interogare in Access permite, intre altele:
A) vizualizarea sau modificarea atributelor, precum si sortarea inregistrarilor intr-o ordine specificata.
B) vizualizarea sau modificarea datelor, precum  si modificarea structurii bazei de date.
C) vizualizarea sau modificarea datelor, precum si proiectarea bazei de date.
D) vizualizarea sau modificarea datelor, precum si sortarea inregistrarilor intr-o ordine specificata.
E) vizualizarea sau modificarea datelor, precum si introducerea evenimentelor intr-o baza de date.

Răspuns corect: D

2. Pentru A=3 si B=10, ce afiseaza secventa urmatoare 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=3 si B=10 afiseaza:
A) C=3
B) C=0
C) C=7
D) nu afiseaza nimic
E) C=10

Răspuns corect: D

3. Se considera tabelul MAT:
Nr.  Cod Mat UM Cant Pret_u
1 21123 Tabla kg 1221 150000
2 31221 Cot kg 1550 120000
3 41124 Con kg 15500 130000

Care este rezultatul urmatoarei interogari:
SQL>  SELECT SUM (Pret_u) As Total
FROM MAT;
A) 150000
B) 130000
C) 120000
D) nu afiseaza nimic
E) 400000

Răspuns corect: E

4. Sa se scrie programul in limbajul Visual Basic pentru urmatoarea problema: Sa se calculeze profitul (profit) sau pierderea (-profit) din vanzari pentru un produs la care se cunosc costul de productie (cost) si pretul de vanzare (pret).
A) Dim cost As Integer
Dim  pret As Integer
Dim profit As Integer
cost=InputBox(„Costul; este: ”)
pret=InputBox(„Pretul este: „)
profit = pret – cost Then  
If pret  > cost
MsgBox  “Profitul este: “ &profit
Else
MsgBox  „Pierderea este: „&(-profit)
B) Dim cost As Integer
Dim pret As Integer
Dim profit As Integer
cost=InputBox(„Costul; este: ”)
pret=InputBox(„Pretul este: „)
profit = pret - cost  
If pret  > cost Then
MsgBox  “Profitul este: “ &profit
Else
MsgBox  “Pierderea este: “ &(-profit)  
End If
C) Dim cost As Integer
Dim pret As Integer
Dim profit As Integer
cost=InputBox(„Costul; este: ”)
pret=InputBox(„Pretul este: „)
profit = pret - cost  
If pret  > cost Then
MsgBox  “Profitul este: “ &profit
Or
MsgBox  „Pierderea este: „&(-profit)
End If
D) Dim cost As Integer
Dim pret As Integer
Dim profit As Integer
cost=InputBox(„Costul; este: ”)
pret=InputBox(„Pretul este: „)
profit = pret - cost  
Daca pret  > cost Atunci
MsgBox  “Profitul este: “ &profit
Altfel
MsgBox  „Pierderea este: „&(-profit)
End Daca
E) Dim cost As Integer
Dim pret As Integer
Dim profit As Integer
cost=InputBox(„Costul; este: ”)
pret=InputBox(„Pretul este: „)
profit = pret - cost  
If pret  > cost
MsgBox  “Profitul este: “ &profit
Else
MsgBox  „Pierderea este: „&(-profit)
End If

Răspuns corect: B

5. În Access, afisarea proprietatilor unui obiect se face:
A) pe grupe de proprietati, fiecare grupa de proprietati aflandu-se pe cate o fisa.
B) pe grupe de activitati, fiecare grupa de activitati avand semnificatia descrisa printr-un simbol.
C) pe grupe de sarcini, fiecare sarcina avand precizate numere de ordine.
D) pe grupe de proprietati, fiecare grupa de proprietati indicand formatul unui obiect.
E) pe grupe de proprietati, fiecare grupa de proprietati indicand o lista de actiuni la care este posibil a raspunde obiectul caruia ii sunt asociate, ca urmare a aparitiei unor evenimente.

Răspuns corect: A

6. Secventa urmatoare 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=10 si B=3 afiseaza:
A) C=-7
B) C=0
C) C=7
D) nu afiseaza nimic
E) C=10

Răspuns corect: C

7. Se considera tabelul MAT:
Nr.  Cod Mat UM Cant Pret_u
1 21123 Tabla kg 1221 170000
2 31221 Cot kg 1550 120000
3 41124 Con kg 15500 130000
Care este rezultatul urmatoarei interogari:

SQL>  SELECT AVG (Pret_u) As media
FROM MAT;
A) 170000
B) 120000
C) 140000
D) nu afiseaza nimic
E) 420000

Răspuns corect: C

8. Sa se stabileasca care varianta este corecta pentru urmatoarea secventa de program scrisa pentru problema:
Sa se calculeze valoarea totala (val_tot) a 10 produse perisabile aflate intr-un depozit, dupa o perioada de depozitare, cunoscand categoriile de produse (definite prin cod_produs) si valoarea acestor produse (val) la inceputul perioadei de depozitare. Valoarea finala (val_f) a fiecarui produs se calculeaza cu formula val_f=val*(1-coef_peris), unde coeficientii de perisabilitate (coef_peris) se evalueaza astfel: daca cod_produs<1000, coef_peris=0; daca cod_produs<2000, coef_peris=0,05; daca cod_produs<3000, coef_peris=0,1; daca cod_produs>=3000, coef_peris=0,5.
A) val_tot = 0
For i=1 To 10
cod_produs(i)=InputBox (“Cod produs: “)
valo(i)=InputBox(“Valoare: “)
Select Case cod_produs(i)
Case Is < 1000
coef_peris=0
Case Is <  2000
coef_peris=5/100
Case Is < 3000
coef_peris=10/100
Case Is >=3000
coef_peris=50/100  
val_f(i) = valo(i)*(1-coef_peris)  
val_tot=val_tot+val_f(i)
Next i
B) val_tot = 0
For i=1 To 10
cod_produs(i)=InputBox (“Cod produs: “)
valo(i)=InputBox(“Valoare: “)
Select Case cod_produs(i)
Case Is < 1000
coef_peris=0
Case Is <  2000
coef_peris=5/100
Case Is < 3000
coef_peris=10/100
Case Is >=3000
coef_peris=50/100
End Select
 val_f(i) = valo(i)*(1-coef_peris)
val_tot=val_tot+val_f(i)
C) val_tot = 0
For i=1 To 10
cod_produs(i)=InputBox (“Cod produs: “)
valo(i)=InputBox(“Valoare: “)
Select Case cod_produs(i)
Case Is < 1000
coef_peris=0
Case Is <  2000
coef_peris=5/100
Case Is < 3000
coef_peris=10/100
Case Is <=3000
coef_peris=50/100
End Select
 val_f(i) = valo(i)*(1-coef_peris)
 val_tot=val_tot+val_f(i)
Next i
D) val_tot = 0
For i=1 To 10
cod_produs(i)=InputBox (“Cod produs: “)
valo(i)=InputBox(“Valoare: “)
Select Case cod_produs(i)  
Case Is < 1000
coef_peris=0
Case Is <  2000
coef_peris=5/100
Case Is < 3000
coef_peris=10/100
Case Is >=3000
coef_peris=50/100
End Select
val_f(i) = valo(i)*(1-coef_peris)
val_tot=val_tot+val_f(i)
Next i
E) val_tot = 0
For i=1 To N
cod_produs(i)=InputBox (“Cod produs: “)
valo(i)=InputBox(“Valoare: “)
Select Case cod_produs(i)
Case Is < 1000  
coef_peris=0
Case Is <  2000  
coef_peris=5/100
Case Is < 3000  
coef_peris=10/100
Case Is >=3000  
coef_peris=50/100
End Select
val_f(i) = valo(i)*(1-coef_peris)
val_tot=val_tot+val_f(i)
Next i

Răspuns corect: D

9. În Access, functiile Sum, Min, Max, Avg si Count asigura efectuarea interogarilor:
A) de actiune
B) asupra unei anumite date
C) de grup
D) de stergere
E) de adaugare

Răspuns corect: C

10. Secventa urmatoare de comenzi:
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
pentru A=5 si B=10 afiseaza:
A) C=5
B) C=0
C) C=100
D) nu afiseaza nimic
E) C=10

Răspuns corect: B

...

+ încă 111 de întrebări.

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