LIMBAJE.rtf

download LIMBAJE.rtf

If you can't read please download the document

Transcript of LIMBAJE.rtf

LIMBAJE1.O interogare in Access permite, intre altele si: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:D2.Secventa urmatoare de comenzi:If A> B then C=B-AElse If A=B then C=0 Else C=A-B Print C=,C End IfEnd Ifpentru A=3 si B=10 afiseaza:a.C=3b.C=0c.C=-7d.nu afiseaza nimice.C=10R:C3.Se considera tabelul MAT:Nr. CodMatUMCantPret_u121123Tablakg1221150000231221Cotkg1550120000341124Conkg15500130000 Care este rezultatul urmatoarei interogari:SQL> SELECT SUM (Pret_u) As TotalFROM MAT; a.150000b.130000c.120000d.nu afiseaza nimice.400000R:E4.Sa se stabileasca care varianta este corecta pentru urmatoarea secventa de program scrisa pentru 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 Ifc.Dim cost As IntegerDim 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 Ifd.Dim cost As IntegerDim pret As IntegerDim 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 Dacae.Dim cost As IntegerDim pret As IntegerDim 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:B5.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:A6.Secventa urmatoare de comenzi:If A< B then C=B-AElse If A=B then C=0 Else C=A-B Print C=,C End IfEnd Ifpentru A=10 si B=3 afiseaza:a.C=-7b.C=0c.C=7d.nu afiseaza nimice.C=10R:C7.Se considera tabelul MAT:Nr. CodMatUMCantPret_u121123Tablakg1221170000231221Cotkg1550120000341124Conkg15500130000 Care este rezultatul urmatoarei interogari:SQL> SELECT AVG (Pret_u) As mediaFROM MAT; a.170000b.120000c.140000d.nu afiseaza nimice.420000R:C8.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=3000 coef_peris=50/100End Select val_f(i) = valo(i)*(1-coef_peris)val_tot=val_tot+val_f(i)c.val_tot = 0For i=1 To 10cod_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/100End Select val_f(i) = valo(i)*(1-coef_peris) val_tot=val_tot+val_f(i)Next id.val_tot = 0For 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 ie.val_tot = 0For 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/100End Select val_f(i) = valo(i)*(1-coef_peris) val_tot=val_tot+val_f(i)Next i R:C9.n Access, functiile Sum, Min, Max, Avg si Count asigura efectuarea interogarilor: a.de actiuneb.asupra unei anumite datec.de grupd.de stergeree.de adaugareR:C10.Secventa urmatoare de comenzi:C = A - BSelect Case C Case Is < 0 C = C + A Case Is > 0 C = C - B Case 0 C = 100End SelectPrint "C=", C pentru A=5 si B=10 afiseaza:a.C=5b.C=0c.C=100d.nu afiseaza nimice.C=10R:B11.Se considera tabelul MAT:Nr. CodMatUMCantPret_u121123Tablakg1221170000231221Cotkg1550120000341124Conkg15500130000 Care este rezultatul urmatoarei interogari:SQL> SELECT MIN (Pret_u) As pu_minFROM MAT; a.170000b.120000c.130000d.nu afiseaza nimice.420000R:B12.Sa se stabileasca care varianta este corecta pentru urmatoarea secventa de program scrisa pentru problema. Sa se calculeze cheltuielile totale de trRport (ch_totale) pentru cinci curse, cunoscand cheltuielile de trRport specifice (ch_tp) categoriei de distanta (dist_tp).a. ch_totale = 0For i=1 To N dist_tp=InputBox(Distanta de trRport: ) Select Case dist_tp(i) Case Is SELECT * FROM MATERIALEWHERE Pret_u BETWEEN 140 AND 170;a.Contine erori de sintaxa b.Selecteaza materialele pentru care pretul este mai mare de 140c.Selecteaza materialele pentru care pretul este mai mare sau egal de 140 si mai mic sau egal de 170d.Selecteaza materialele pentru care pretul este mai mic de 140 si mai mare de 170e.Selecteaza materialele pentru care pretul este mai mic de 170R:C28.Sa se stabileasca care este secventa de program corecta pentru urmatoarea problema: o societate comerciala desface 25 de produse pentru care se cunosc urmatoarele date de intrare: codprod codul produsului; denprod denumirea produsului; cant cantitate; pret pretul. Sa se calculeze valoarea pentru fiecare produs in parte si sa se afiseze pe ecran doar acele produse pentru care valoarea (VAL) este mai mare ca 600 RON.a.For i=1 To 25 codprod=InputBox(Introduceti cod produs)denprod=InputBox(Introduceti denumire produs)cant=InputBox(Introduceti cantitatea)pret=InputBox(Introduceti pretul)VAL=cant*pretIf VAL >600 ThenPrint Tab(2); denprod;Tab(33); VALEnd IfNext ib.For i=1 To M codprod=InputBox(Introduceti cod produs)denprod=InputBox(Introduceti denumire produs)cant=InputBox(Introduceti cantitatea)pret=InputBox(Introduceti pretul)VAL=cant*pretIf VAL >600 ThenPrint Tab(2); denprod;Tab(33); VALEnd IfNext ic.For i=1 To 25 codprod=InputBox(Introduceti cod produs)denprod=InputBox(Introduceti denumire produs)cant=InputBox(Introduceti cantitatea)pret=InputBox(Introduceti pretul)VAL=cant*pretIf VAL 600 ThenPrint Tab(2); denprod;Tab(33); VALEnd IfNext ie.For i=1 To 25 codprod=InputBox(Introduceti cod produs)denprod=InputBox(Introduceti denumire produs)cant=InputBox(Introduceti cantitatea)pret=InputBox(Introduceti pretul)VAL=cant*pretIf VAL >600 ThenPrint Tab(2); denprod;Tab(33); VALEnd IfR:A29.Secventa urmatoare de comenzi:C = A - BFor i = 1 To 2Select Case C Case Is < 0 C = C + A Case Is > 0 C = C - B Case 0 C = 100End SelectPrint "C=", CNext ipentru A=5 si B=10 afiseaza:a.C= - 5 si C=100b.C=5 si C=100c.C=0 si C= 100d.C= - 5 si C= 5e.C=100R:C30.Se considera tabelul MATERIALE avand urmatoarea structura: MATERIALE (COD, DEN, UM, CANT, PRET_U). Comanda: SQL> SELECT AVG(cant) FROM MATERIALEWHERE Pret_u SELECT SUM (UM) As TotalFROM MAT; a.150000b.130000c.nu afiseaza nimicd.120000e.400000R:C32.Se considera tabelul MAT:Nr. CodMatUMCantPret_u121123Tablakg1221170000231221Cotkg1550120000341124Conkg15500130000 Care este rezultatul urmatoarei interogari:SQL> SELECT AVG (UM) As mediaFROM MAT; a.170000b.120000c.140000d.nu afiseaza nimice.420000R:D33.Se considera tabelul MAT:Nr. CodMatUMCantPret_u121123Tablakg1221170000231221Cotkg1550120000341124Conkg15500130000 Care este rezultatul urmatoarei interogari:SQL> SELECT MIN (Cant) As pu_minFROM MAT; a.1221b.1550c.15500d.nu afiseaza nimice.420000R:A34.Se considera tabelul MAT cu urmatoarea structura:Nr. CodMatUMCantPret_u121123Tablakg1221170000231221Cotkg1550120000341124Conkg15500130000 Sa se stabileasca care este rezultatul interogarii de mai jos:SQL> SELECT MAX (Cant) As cmaxFROM MAT; a.15500b.1221c.1550d.nu afiseaza nimice.420000R:A35.Daca se considera tabelul MATERIALE avand urmatoarea structura: MATERIALE (COD, DEN, UM, CANT, PRET_U). Comanda: SQL> SELECT * FROM MATERIALEWHERE Pret_u BETWEEN 130 AND 200a.Comanda contine erori de sintaxa b.Selecteaza materialele pentru care pretul este mai mare de 130c.Selecteaza materialele pentru care pretul este mai mare sau egal de 130 si mai mic sau egal de 200d.Selecteaza materialele pentru care pretul este mai mic de 130 si mai mare de 200e.Selecteaza materialele pentru care pretul este mai mic de 200R:A36.Sa se stabileasca varianta corecta pentru secventa de program care se refera la urmatoarea problema: sa se calculeze penalitatile pentru plata furnizorilor la o societate comerciala si suma de plata pe factura majorata, stiind valoarea initiala a facturilor si numarul de zile de intarziere pentru fiecare factura. Penalitatile se calculeaza astfel: pana la 15 zile intirziere 5%, intre 15 si 30 de zile -8%, iar peste 30 de zile 10%. Numarul de facturi luat in calcul este 3.a.For i=1 TO 3nrfact(i)= InputBox( Introduceti numarul facturii)Valf(i)= InputBox( Valoarea facturii)nrzile(i)= InputBox( Nr. Zile intarziere)Next iSumaPTotal=0 For i=1 TO 3Select Case nrzile(i)Case Is= 30SumaP(i) = Valf(i) + Valf(i) *10/100End Select Print nrzile(i), Valf(i), Sumap(i) SumaPTotal = SumaPTotal + SumaP(i) Next ib. For i=1 TO nnrfact(i)= InputBox( Introduceti numarul facturii)Valf(i)= InputBox( Valoarea facturii)nrzile(i)= InputBox( Nr. Zile intarziere)Next iSumaPTotal=0 For i=1 TO 3Select Case nrzile(i)Case Is= 30SumaP(i) = Valf(i) + Valf(i) *10/100End Select Print nrzile(i), Valf(i), Sumap(i) SumaPTotal = SumaPTotal + SumaP(i) Next ic. For i=1 TO 3nrfact(i)= InputBox( Introduceti numarul facturii)Valf(i)= InputBox( Valoarea facturii)nrzile(i)= InputBox( Nr. Zile intarziere)SumaPTotal=0 For i=1 TO 3Select Case nrzile(i)Case Is= 30SumaP(i) = Valf(i) + Valf(i) *10/100End Select Print nrzile(i), Valf(i), Sumap(i) SumaPTotal = SumaPTotal + SumaP(i) Next id. For i=1 TO 3nrfact(i)= InputBox( Introduceti numarul facturii)Valf(i)= InputBox( Valoarea facturii)nrzile(i)= InputBox( Nr. Zile intarziere)Next iSumaPTotal=0 For i=1 TO 3Select Case nrzile(i)Case Is= 30SumaP(i) = Valf(i) + Valf(i) *10/100End Select Print nrzile(i), Valf(i), Sumap(i) SumaPTotal = SumaPTotal + SumaP(i)e. For i=1 TO 3nrfact(i)= InputBox( Introduceti numarul facturii)Valf(i)= InputBox( Valoarea facturii)nrzile(i)= InputBox( Nr. Zile intarziere)Next iSumaPTotal=0 For i=1 TO nSelect Case nrzile(i)Case Is= 30SumaP(i) = Valf(i) + Valf(i) *10/100End Select Print nrzile(i), Valf(i), Sumap(i) SumaPTotal = SumaPTotal + SumaP(i) Next iR:A37.Sa se stabileasca varianta corecta pentru secventa de program care se refera la urmatoarea problema: sa se calculeze suma de plata a energiei electrice pentru o societate comerciala, cunoscand suma de plata la scadenta SumaInit, nr. De zile de intarziere a platii Nrzile si procentul de penalizare ProcPenaliz. Daca societatea comerciala se afla la prima abatere PrimaAbatere, penalizarile se reduce la jumatate.a.Dim SumaInit As Double, NrZile As Integer Dim ProcPenaliz As Single, SumaFin As Double Dim PrimaAbatere As Boolean SumaInit= Val(txtSuma) NrZile= Val(txtIntarziere) PrimaAbatere= chkAbatere If PrimaAbatere Then ProcPenaliz= Val(txtProcent)/2 ProcPenaliz= Val(txtProcent)End If SumaFin= SumaInit + SumaInit *(ProcPenaliz/100)*NrZile txtTotal = Format(SumaFin, Standard)b.Dim SumaInit As Double, NrZile As Integer Dim ProcPenaliz As Single, SumaFin As Double Dim PrimaAbatere As Boolean SumaInit= Val(txtSuma) NrZile= Val(txtIntarziere) PrimaAbatere= chkAbatere If PrimaAbatere Then ProcPenaliz= Val(txtProcent)/2 Else ProcPenaliz= Val(txtProcent)End If SumaFin= SumaInit + SumaInit *(ProcPenaliz/100)*NrZile txtTotal = Format(SumaFin, Standard)c.Dim SumaInit As Double, NrZile As Integer Dim ProcPenaliz As Single, SumaFin As Double Dim PrimaAbatere As Boolean NrZile= Val(txtIntarziere) PrimaAbatere= chkAbatere If PrimaAbatere Then ProcPenaliz= Val(txtProcent)/2 Else ProcPenaliz= Val(txtProcent)End If SumaFin= SumaInit + SumaInit *(ProcPenaliz/100)*NrZile txtTotal = Format(SumaFin, Standard)d.Dim SumaInit As Double, NrZile As Integer Dim ProcPenaliz As Single, SumaFin As Double Dim PrimaAbatere As Boolean SumaInit= Val(txtSuma) NrZile= Val(txtIntarziere) PrimaAbatere= chkAbatere If PrimaAbatere Then ProcPenaliz= Val(txtProcent)/2 Else ProcPenaliz= Val(txtProcent) SumaFin= SumaInit + SumaInit *(ProcPenaliz/100)*NrZile txtTotal = Format(SumaFin, Standard)e.Dim SumaInit As Double, NrZile As Integer Dim ProcPenaliz As Single, SumaFin As Double Dim PrimaAbatere As Boolean SumaInit= Val(txtSuma) NrZile= Val(txtIntarziere) If PrimaAbatere Then ProcPenaliz= Val(txtProcent)/2 Else ProcPenaliz= Val(txtProcent)End If SumaFin= SumaInit + SumaInit *(ProcPenaliz/100)*NrZile txtTotal = Format(SumaFin, Standard)R:B38.SGBD Microsoft Access foloseste pentru obtinerea unui raport: a.baza de date din care se cere raportulb.interogarile facute pe baza de datec.datele de intrared.formularelee.o copie protejata la scriere a datelor.R:E39.Macroinstructiunea sau macro-ul (Macro) reprezinta un obiect Access care defineste un Ramblu de comenzi pe care sistemul Microsoft Access le executa automat la: a.deschiderea bazei de dateb.aparitia unor evenimente.c.la construirea unei interogarid.la obtinerea unui raporte.popularea bazei de dateR:B40.In SGBD Microsoft Access, grupurile macro reunesc mai multe comenzi: a.referitoare numai la interogarib.diferitec.referitoare numai la rapoarted.referitoare numai la formularee.similare sau inruditeR:E41.In SGBD Microsoft Access, obiectele care fac parte din formular poarta denumirea de: a.focusb.evenimentec.controaled.clasee.tipuriR:C42.In limbajul Visual Basic, operatorul ^ este un operator:a.de stabilire a prioritatiib.de compararec.de exponentiered.de concatenare sir de caractere alfabeticee.logicR:C43.In programarea orientata pe obiecte (OOP), care dintre urmatoarele elemente sunt inglobate de un obiect?a.structura, modelulb.clasa, tipulc.structura, modelul, persistentad.structura de date, specificarea operatiilor, implementarea operatiilore.clasa, metoda, persistentaR:D44.In ce consta universalitatea unui algoritm?a.in aplicarea algoritmului asupra unui numar mare de intrarib.in prezentarea vizuala a fluxului de datec.in existenta unei scheme logiced.in scrierea corecta a programuluie.in a cunoaste la orice moment al executiei care este succesiunea fireasca a operatiilorR:A45.In definirea unei baze de date se folosesc urmatoarele notiuni:1)Colectia de date2)Limbajul Visual Basic3)Descrierea datelor4)Relatiile dintre date5)Programare6)Tastatura calculatorului.Specificati raspunsul corect:a.2+5+6b.1+3+4c.1+2+3+4+5+6d.1+2+3e.4+5+6R:B46.Modelul de date relational se caracterizeaza printr-o singura structura de date denumita:a.relatie sau inregistrare b.relatie sau atributc.relatie sau camp de dated.relatie sau tabele.relatie sau ierarhie R:D47.Ca notiune de baza in programarea orientata pe obiecte, mostenirea:a.Este o proprietate a obiectelor care implica existenta acestora si dupa incetarea procesului care le-a creatb.Este proprietatea care defineste posibilitatea de a masca atributele proprii ale unui obiect si modul in care se executa operatiilec.Permite constituirea de noi obiecte si clase intr-o ierarhie de module, evitand rescrierea si codificaread.Permite invocarea pentru obiecte de diferite tipuri a operatiilor cu acelasi nume, dar cu semantica si implementare diferitae.Defineste caracteristica unei operatii de a se comporta in mod diferit, in functie de clasa de obiecte careia ii apartineR:C48.Erorile semnalate in faza de compilare a unui program scris intr-un limbaj de programare sunt:a.erori de algoritmb.erori de executiec.erori de codificare numite si erori de sintaxad.erori de schema logicae.erori de asamblareR:C49.Intr-o aplicatie informatica bazata pe evenimente:a.codul nu urmareste o cale prestabilita, ci secvente de program executate ca raspuns la aparitia evenimentelorb.aplicatia in sine decide ce portiuni de cod sau de program se executa la un moment datc.codul urmareste o cale prestabilita in care aparitia unor evenimente nu provoaca nici o reactie din partea aplicatiei informaticed.codul urmareste o cale prestabilita specifica aplicatiilor proceduralee.codul urmareste o cale prestabilita, iar evenimentele nu apar decat foarte rar (in special atunci cand se produc erori in sistemul de calcul)R:A50.In limbajul Visual Basic, operatorii & si + sunt operatori:a.de stabilire a prioritatiib.de concatenare sir de caractere alfabeticec.de exponentiered.de compararee.logiciR:B51.In limbajul Visual Basic, operatorii () si [] sunt operatori:a.logicib.de compararec.de exponentiered.de concatenare sir de caractere alfabeticee.de stabilire a prioritatiiR:E52.In limbajul Visual Basic, operatorii AND, OR si NOT sunt operatori:a.de stabilire a prioritatiib.de compararec.de exponentiered.de concatenare sir de caractere alfabeticee.logiciR:E53.In limbajul Visual Basic, functiile DDB si PMT sunt:a.functii de afisareb.functii de editarec.functii statisticed.functii financiaree.functii pentru siruri de caractereR:D54.Limbajul Visual Basic prezinta caracteristici specifice: 1programarii structurate2orientarii spre manipularea fisierelor clasice3programarii dirijate de evenimente4orientarii spre prelucrarea bazelor de date (manipulare si interogare)5programarii bazate pe obiecte6programarii inteligentea.1+2+3+4b.1+3+4+5c.2+3+4+5d.3+4+5+6e.2+4+5+6R:B55.Categoriile de evenimente care pot avea loc intr-o baza de date in Access sunt:1evenimente care fac referire la date2evenimente de focalizare3evenimente asociate cu alte evenimente4evenimente asociate butoanelor de la tastatura5evenimente asociate mouse-uluia.1+2+3+4b.2+3+4+5c.1+2+4+5d.1+2+3e.1+2+3+4+5R:C56.In Microsoft Access, intr-o interogare, criteriile reprezinta:a.Adaugarea unui camp unui tabelb.Restrictiile pe care le stabilim pentru a identifica anumite inregistrari din baza de datec.Restrictiile pe care le stabilim pentru a identifica anumite campuri din baza de dated.Stergerea unui camp dintr-un tabele.Adaugarea unei inregistrari intr-un tabel R:B