...t de la tastaturaAfisarea scenaristilor pe genuri cinematografice dupa 1990Varsta lui Tom CruiseActorii care au jucat in filmul Pe aripile vantului Lista actritelor care n-au depasit 30 de ani pe nationalitatiPrimii 5 veterani ai filmului romanesc.REZOLVARE modi comm filmeclearset talk offset exact off1do hile 1i 2,10 say Optiunile..... i 4,4 say Apasati CAPS LOCK-ul ca sa mearga programul. Mi-a fost lene sa-l mai modific i 7,2 say 1... Introducerea unui nou film.i 8,2 say 2... Afisarea primului film cronologic al fiecarui gen.i 9,2 say 3... Tarile care fac parte din baza.i 10,2 say 4... Afisarea filmelor produse in Italia in 1994.i 11,2 say 5... Lista filmelor pe genuri.i 12,2 say 6... Regizorii din Romania de la 1990 pana in prezent.i 13,2 say 7... Premiile pe care le-a luat un film cautat.i 14,2 say 8... Scenaristii pe genuri cinematrografice dupa 1990.i 15,2 say 9... Ce varsta are Tom Cruise...i 16,2 say 10... Ce actori au jucat in filmul Pe aripile vantului...i 17,2 say 11... Lista actritelor care n-au depasit 30 de ani pe nationalitati.i 18,2 say 12... Primii 5 veterani ai filmului romanesc.input Ce optiune doriti... to xdo casecase x1do noucase x2cleardo cronoaitcase x3cleardo tari aitcase x4cleardo italyaitcase x5cleardo genuriaitcase x6cleardo regromaitcase x7cleardo filmalesaitcase x8cleardo listascenaristiaitcase x9cleardo tomaitcase x10cleardo pearipiaitcase x11cleardo actriteaitcase x12cleardo veteraniaitendcasecleari 2,2 say Continuam cu optiunile... D1 N0 get readclearenddoreturnPROCEDURE NOUr1do hile r1clearuse cinemas reccount1go bottominsert blankreplace codfilm ith si 2,2 say Dati numele filmului... get numefilmi 3,2 say Productie... get productiei 4,2 say Regia... get regiai 5,2 say Anul... get anuli 6,2 say Genul filmului... get geni 7,2 say Scenaristul filmului... get scenariui 8,2 say Premiile primite... get premiin0i 9,2 say Cati actori au jucatget nreadclearuse actorifor i1 to n go bottominsert blankreplace codfilm ith s Actorul,ii 3,2 say Numele...get numei 4,2 say Sexul mf...get sexi 5,2 say Data nasterii... get datani 6,2 say Nationalitatea... get natioreadclearendfori 10,4 say Continuam cu introducerea filmelor...D1 N0... get rreadclearenddoreturnPROCEDURE CRONOuse cinemasort to cine2 on gen, anuluse cine2ggendo hile not eof Primul film al genului ,g, a fost ,numefilmdo hile ggenskipenddoggenenddousereturnPROCEDURE TARIuse cinemasort to cine1 on productieuse cine1 Tarile sunt urmatoarelepproductiedo hile not eof ,pdo hile pproductieskipenddopproductieenddoreturnPROCEDURE ITALYuse cinema Filmele produse in Iatlia in anul 1994 sunt...for i1 to reccountgo iif productie ITALIA .and. anul1994 , numefilmendifendforreturnPROCEDURE GENURIuse cinemasort to cine3 on gen, numefilmuse cine3gegendo hile not eof Genul ,gedo hile gegen , numefilmskipenddoAITgegenenddoreturnPROCEDURE REGROMuse cinema Regizorii filmelor produse in Romania dupa 1989 sunt...for i1 to reccountgo iif productie ROMANIA .and. anul1989 ,regiaendifendforreturnPROCEDURE FILMALESnf i 2,2 say Numele filmului dorit... get nfREADi 4,2 SAY Premiile filmului cerut sunt urmatoareleuse cinemafor i1 to reccountgo iif numefilm nf ,premiiendifendforreturnPROCEDURE LISTASCENARISTIuse cinemasort to cine4 on gen, scenariuuse cine4gegendo hile not eof Genul ,gedo hile gegen , scenariuskipenddoAITgegenenddoreturnPROCEDURE TOMuse actorifor i1 to reccountgo iif nume TOM CRUISE TOM CRUISE are varsta de... ,year date - yeardatan, de ani.endifendforreturnPROCEDURE PEARIPIuse cinemafor i1 to reccountgo iif numefilm PE ARIPILE VANTULUIcodcodfilmendifendforuse actori In filmul PE ARPILE VANTULUI au jucat urmatorii actori for i1 to reccountgo iif codfilmcod ,numeendifendforreturnPROCEDURE ACTRITEuse actorisort to act1 on natiouse act1 Lista actritelor care n-au 30 de ani pe nationalitati for i1 to reccountgo iif yeardatan1971 .and. sex F ,nume, in varsta de ,yeardate-yeardatan, ani.endifendforreturnPROCEDURE VETERANIuse actorisort to acti on datanD, nume for natio ROMANAuse acti Actorii veterani romani sunt if reccount5for i1 to 5go i numeendforelselist numeendifreturnCJOJPJaQJJ5CJOJPJaQJtJJFdVraaFaaaaa
aa7TSLa1COVahtIa...
Download