Subiectul al II-lea, 3., toate variantele

Declarați variabila c și scrieți o secvență de instrucțiuni Pascal în urma executării căreia să se afișeze, pe prima linie a ecranului, cuvântul crema, urmat de cuvântul DA, dacă prăjitura are cremă, sau de cuvântul NU, în caz contrar, iar pe a doua linie a ecranului cuvântul pret, urmat de prețul prăjiturii. Primul cuvânt de pe fiecare linie este urmat de un spațiu, ca în exemplu. Exemplu: dacă variabila c memorează litera V, iar variabila p memorează 10, se afișează pe ecran: crema DA pret 10 (6p.)

Declarați variabila tip și scrieți o secvență de instrucțiuni Pascal în urma executării căreia se afișează pe ecran tipul ciocolatei și, pe linia următoare, mesajul scumpa, dacă prețul acesteia este strict mai mare decât 10 lei, sau mesajul ieftina în caz contrar. Exemplu: dacă variabila pret memorează valoarea 16, iar variabila tip memorează litera N, se afișează pe ecran ciocolata neagra scumpa (6p.)

Declarați corespunzător variabilele cod1 și cod2 și scrieți o secvență de instrucțiuni Pascal în urma executării căreia să se afișeze pe ecran, pentru fiecare soi, în ordine oarecare, pe linii separate, codul și numărul de fire achiziționate, ca în exemplu. Valorile afișate pe aceeași linie sunt separate printr-un spațiu. Exemplu: dacă cod1 memorează litera A și pret1 memorează valoarea 5, cod2 memorează litera P și pret2 memorează valoarea 4, atunci se afișează pe ecran: A 200 P 250 (6p.)

Variabila reală p memorează prețul unui produs. Declarați variabila p și scrieți o secvență de instrucțiuni Pascal prin care se afișează pe ecran mesajul ieftin, dacă prețul produsului este strict mai mic decât 100, mesajul moderat dacă prețul produsului aparține intervalului [100,500] sau mesajul scump, în caz contrar. (6p.)

Pentru un material se memorează date specifice: denumire (o literă mare a alfabetului englez), preț unitar și cantitate (numere naturale). Variabilele denumire1, pret1 și cantitate1 memorează date specifice pentru un material, iar variabilele denumire2, pret2 și cantitate2 memorează date specifice pentru un alt material. Declarați variabilele denumire1 și denumire2 și scrieți o secvență de instrucțiuni Pascal astfel încât, în urma executării acesteia, să se afișeze pe ecran denumirea corespunzătoare materialului care are costul total (produsul dintre prețul unitar și cantitate) mai mare, sau mesajul egal dacă cele două materiale au costuri totale egale. (6p.)

Variabila temperatura este de tip întreg și memorează temperatura medie a aerului, măsurată în grade Celsius, înregistrată în București într-un an calendaristic. Scrieți o secvență de instrucțiuni în urma executării căreia să se afișeze pe ecran mesajul CALDUROS dacă temperatura menționată a fost strict mai mare decât 11°C, mesajul RACOROS dacă temperatura menționată a fost strict mai mică decât 10°C, sau mesajul NORMAL în orice alt caz. (6p.)

În secvența de mai jos toate variabilele sunt de tip întreg, iar de la tastatură se citesc 10 numere naturale. Scrieți secvența înlocuind punctele de suspensie astfel încât, în urma executării secvenței obținute, valoarea variabilei maxp să fie egală cu cel mai mare dintre numerele citite care sunt pare și au două cifre, sau să fie egală cu -1 dacă nu există astfel de numere. (6p.)

maxp:=......; for i:=1 to 10 do begin read(x); ............. end;

Pentru fiecare dintre cei doi angajați ai unei societăți comerciale se cunosc anul nașterii și venitul. Variabilele întregi an1 și venit1 memorează anul nașterii primului angajat, respectiv venitul lunar al acestuia, iar variabilele întregi an2 și venit2 memorează anul nașterii celui de al doilea angajat, respectiv venitul lunar al acestuia. Cei doi angajați au venituri diferite. Scrieți o secvență de instrucțiuni Pascal în urma executării căreia se afișează pe ecran date despre angajatul cu cel mai mare venit: venitul lunar al acestuia urmat, pe rândul următor, de anul nașterii sale. (6p.)

Un număr de telefon în format internațional are trei componente: codul de țară, codul zonal (sau de rețea) și numărul local, numere naturale cu cel mult nouă cifre, pentru codul de țară eliminându-se cifrele nule nesemnificative. Variabilele întregi cT1, cZ1 și nL1 memorează codul de țară, codul zonal, respectiv numărul local pentru un abonat, iar variabilele cT2, cZ2 și nL2 memorează codul de țară, codul zonal, respectiv numărul local pentru un alt abonat. Scrieți o secvență de instrucțiuni Pascal astfel încât, în urma executării acesteia, să se afișeze pe ecran mesajul aceeasi zona sau retea, urmat de cele două numere locale, dacă cei doi abonați provin din aceeași țară și aceeași zonă/rețea, mesajul aceeasi tara, dar zone sau retele diferite, dacă cei doi abonați provin din aceeași țară dar zone/rețele diferite, respectiv mesajul tari diferite, în caz contrar. Datele afișate pe aceeași linie a ecranului sunt separate prin câte un spațiu, Exemplu: dacă cT1=254, cZ1=722, nL1=123456, iar cT1=254, cZ1=722, nL1=456789 se afișează pe ecran aceeasi zona sau retea 123456 456789 (6p.)

Variabilele x1, x2 și x3 memorează câte o literă corespunzătoare primelor trei plăcuțe din mozaic, în această ordine, notându-se cu litera R cele roșii și cu litera A cele albe. Declarați variabilele x1, x2 și x3 și scrieți o secvență de instrucțiuni Pascal în urma executării căreia să se afișeze mesajul alternativ, dacă cele trei plăcuțe respectă modelul alternativ al mozaicului, sau mesajul neconform, în caz contrar. Exemplu: pentru mozaicul alăturat, unde sunt evidențiate două zone în care nu se respectă modelul, variabilele x1, x2 și x3 memorează literele A, R, respectiv A, și se afișează pe ecran mesajul alternativ. (6p.)

O mașină de epocă a fost prezentată la două expoziții auto, în primele două luni ale anului curent. Variabilele ziua1 și luna1 memorează ziua, respectiv luna în care a avut loc una dintre cele două expoziții, iar variabilele ziua2 și luna2 memorează ziua, respectiv luna în care a avut loc cealaltă expoziție. Zilele sunt memorate ca numere naturale din intervalul [1,31], iar pentru fiecare lună se memorează prima literă, mare, din denumirea acesteia. Declarați variabilele luna1 și luna2 și scrieți o secvență de instrucțiuni Pascal în urma executării căreia să se afișeze pe ecran data la care a avut loc prima expoziție, cu ziua și numele complet al lunii, scris cu litere mari ale alfabetului englez.

Exemplu: dacă ziua1 și luna1 memorează numărul 15, respectiv litera I, iar ziua2 și luna2 memorează numărul 20, respectiv litera I sau numărul 10, respectiv litera F, se afișează pe ecran 15 IANUARIE (6p.)

Pentru fiecare dintre doi specialiști IT ai unei companii se cunosc anul nașterii și anul angajării. Variabilele întregi sn1 și sa1 memorează anul nașterii primului specialist, respectiv anul angajării acestuia, iar variabilele întregi sn2 și sa2 memorează anul nașterii celui de al doilea specialist, respectiv anul angajării acestuia. Scrieți o secvență de instrucțiuni Pascal în urma executării căreia se afișează pe ecran anul angajării, dacă cei doi specialiști sunt angajați în același an, iar în caz contrar date despre specialistul angajat mai de curând: anul nașterii și anul angajării sale, separate printr-un spațiu. Exemplu: pentru sn1=1990 și sa1=2020, dacă sn2=2000 și sa2=2020 se afișează 2020 iar dacă sn2=2000 și sa2=2025 se afișează 2000 2025 (6p.)

Variabila prod memorează inițiala producătorului unui telefon (litera A pentru APPLE sau litera S pentru SAMSUNG), iar variabila pret memorează prețul acestuia (număr real). Declarați variabilele prod și pret și scrieți o secvență de instrucțiuni Pascal care afișează pe ecran, pe linii separate, datele telefonului, precedate de cuvintele PRODUCATOR, respectiv PRET, scrise toate cu litere mari, ca în exemplu. Exemplu: dacă variabila prod memorează litera A, iar variabila pret memorează 1599.99 se afișează: PRODUCATOR APPLE PRET 1599.99 (6p.)

Declarați corespunzător variabilele c1 și c2 și, știind că cele două jocuri au numere diferite de niveluri de dificultate, scrieți o secvență de instrucțiuni Pascal în urma executării căreia să se afișeze pe ecran datele jocului cu mai multe niveluri: denumirea completă a categoriei (ACTIUNE sau STRATEGIE), urmată de un spațiu și apoi de numărul de niveluri de dificultate ale jocului. Exemplu: dacă c1 memorează litera A și n1=2, iar c2 memorează litera S și n2=4, atunci se afișează pe ecran STRATEGIE 4 (6p.)

Pentru a verifica dacă în tabloul unidimensional (3,7,10,12,20,23,65) există elementul cu valoarea x=21, se aplică metoda căutării binare. Scrieți succesiunea de elemente din tablou ale căror valori se compară cu valoarea lui x pe parcursul aplicării metodei indicate. (6p.)

Variabilele garda1 și garda2 memorează câte un număr real, reprezentând garda la sol (măsurată în metri) pentru două motociclete. Declarați corespunzător variabilele precizate și scrieți o secvență de instrucțiuni în urma executării căreia să se afișeze pe ecran mesajul la fel, dacă cele două motociclete au aceeași gardă la sol, mesajul prima sus dacă prima are garda la sol mai mare, sau mesajul a doua sus, dacă a doua are garda la sol mai mare. (6p.)

Variabilele ora_aterizare, minut_aterizare și durata sunt întregi și memorează date referitoare la un zbor al unui avion, derulat în totalitate în aceeași zi, pe teritoriul României: ora și minutul aterizării, respectiv durata zborului, exprimată în minute. Ora este un număr din intervalul [0,23], iar minutul un număr din intervalul [0,59]. Scrieți o secvență de instrucțiuni în urma executării căreia să se memoreze în variabilele întregi ora_decolare și minut_decolare ora, respectiv minutul la care a decolat avionul. (6p.)

Declarați variabilele cod1 și cod2, respectiv suprafata1 și suprafata2 și scrieți o secvență de instrucțiuni Pascal în urma executării căreia să se afișeze pe ecran codul acelui oraș, dintre cele două precizate mai sus, care are densitatea mai mare, sau mesajul egale, dacă cele două densități sunt egale. (6p.)

Setul de variabile întregi an, luna, zi memorează valori specifice unei date calendaristice din cadrul primului semestru al acestui an școlar (14.09.2020 – 29.01.2021). Scrieți o secvență de instrucțiuni în urma executării căreia să se afișeze pe ecran, în funcție de perioada căreia îi aparține data, mesajul vacanta, dacă este din perioada vacanței de iarnă (23.12.2020 – 10.01.2021), sau mesajul scoala, în caz contrar. Exemplu: dacă an=2020, luna=11, zi=16, se afișează pe ecran scoala. (6p.)

Variabila i este de tip întreg, iar celelalte variabile sunt de tip char. Scrieți ce se afișează în urma executării secvenței alăturate. (6p.)

c1:='E';c2:='L';c3:='T'; write(c1,c2); for i:=2 to 5 do begin if i mod 2=0 then c:=c1 else c:=chr(ord(c2)+i div 2); write(c) end; write(c3);