Bacalaureat 2019
Model de subiect
Pascal – Științele naturii 3h
Informatică 2019
Informatică – Pascal – Științele naturii – Bacalaureat 2019, model de subiect
Textul subiectului
Ministerul Educaţiei Naționale
Centrul Naţional de Evaluare şi Examinare
Examenul de bacalaureat naţional 2019
Proba E. d)
Informatică
Limbajul Pascal
MODEL
Filieră teoretică, profil real, specializare științe ale naturii
• Toate subiectele sunt obligatorii. Se acordă 10 puncte din oficiu.
• Timpul de lucru efectiv este de 3 ore.
• Identificatorii utilizaţi în rezolvări trebuie să respecte precizările din enunţ (bold), iar în lipsa unor
precizări explicite, notaţiile trebuie să corespundă cu semnificaţiile asociate acestora (eventual
în formă prescurtată). Datele de intrare se consideră corecte, validarea lor nefiind necesară.
SUBIECTUL I (20 de puncte)
Pentru fiecare dintre itemii de la 1 la 5, scrieţi pe foaia de examen litera corespunzătoare răspunsului
corect. Fiecare răspuns corect se notează cu 4 puncte.
1. Variabila întreagă n memorează un număr natural. Indicați expresia Pascal care are valoarea true
dacă şi numai dacă numărul memorat în n este divizibil cu 20, dar NU şi cu 19.
a. (n mod 380=0) and (n div 20=0) b. (n mod 380<>0) or not(n mod 19=0)
c. (n mod 20=0) and (n div 19=0) d. not((n mod 20<>0) or (n mod 19=0))
2. Interclasând descrescător tablourile unidimensionale (1,5,7,10,20) și (19,10,9,8,5,1) se
obține:
a. (20,19,10,9,8,5,1) b. (20,19,10,10,9,8,7,5,5,1,1)
c. (20,19,10,9,8,7,5,1) d. (20,19,10,10,9,7,8,5,5,1,1)
3. Indicați expresia care are valoarea true dacă și numai dacă numărul memorat în variabila întreagă
x aparține intervalului (-19,19).
a. abs(-x)<19 b. abs(x)>-19
c. (abs(-x)>=-19) and (abs(x)<=19) d. (abs(x)>=-19) or (abs(-x)<=19)
4. Variabilele i şi j sunt de tip întreg. Indicați expresia care poate înlocui punctele de suspensie astfel
încât, în urma executării secvenţei obţinute, să se afișeze numerele de mai jos, în această ordine.
for i:=1 to 4 do
1 2 3 4
begin for j:=1 to 4 do write(.......);
5 6 7 8
writeln
9 10 11 12
end;
13 14 15 16
a. i+(j-1)*4 b. i+(j+1)*4 c. (i-1)*4+j d. (i+1)*4+j
5. Pentru orice valori naturale nenule ale variabilelor x și y, z x
valoarea obținută pentru variabila z în urma executării ┌cât timp z≥y execută z z-y
secvenței este: └■
a. câtul împărțirii lui b. câtul împărțirii lui c. restul împărțirii lui d. restul împărțirii lui
y la x x la y y la x x la y
SUBIECTUL al II-lea (40 de puncte)
1. Se consideră algoritmul alăturat, reprezentat în pseudocod. citeşte n
(număr natural)
a) Scrieţi valorile afişate dacă se citește numărul 7. (6p.) k 1
b) Scrieţi cel mai mic și cel mai mare număr care pot fi citite astfel ┌cât timp n≥ ≥1 execută
încât, în urma executării algoritmului, pentru fiecare dintre │┌dacă n>k atunci i k
acestea, ultima valoare afişată să fie 10. (6p.) ││altfel i n
│└■
c) Scrieţi programul Pascal corespunzător algoritmului dat. (10p.) │ n n-i
d) Scrieţi în pseudocod un algoritm, echivalent cu cel dat, │┌cât timp i≥ ≥1 execută
înlocuind una dintre structurile cât timp...execută cu o ││ scrie k,' '; i i-1
structură repetitivă de alt tip. (6p.) │└■
│ k k+1
└■
Probă scrisă la informatică MODEL
Limbajul Pascal
Filieră teoretică, profil real, specializare științe ale naturii
Pagina 1 din 2
Ministerul Educaţiei Naționale
Centrul Naţional de Evaluare şi Examinare
2. Variabilele pre și pim memorează partea reală, respectiv partea imaginară ale unui număr complex
(numere reale). Declarați variabilele precizate și scrieți o secvență de instrucțiuni Pascal care
afișează pe ecran mesajul multimea R, dacă numărul complex corespunzător aparține mulțimii
numerelor reale, sau mesajul multimea C, în caz contrar. (6p.)
3. Aplicând metoda căutării binare pentru a verifica dacă într-un tablou unidimensional există
elementul cu o valoare oarecare x, aceasta se compară cu maximum 3 elemente ale tabloului. Dați
exemplu de un astfel de tablou. (6p.)
SUBIECTUL al III-lea (30 de puncte)
1. Se citește un număr natural, n, și se cere să se scrie suma cifrelor prime ale lui n.
Exemplu: dacă n=1235405, atunci se scrie 15, iar dacă n=140, atunci se scrie 0.
Scrieţi, în pseudocod, algoritmul de rezolvare a problemei enunțate. (10p.)
2. Scrieți un program Pascal care citește de la tastatură numărul natural n (n∈∈[2,102], apoi cele n
elemente ale unui tablou unidimensional, numere naturale din intervalul [0,102], și afișează pe
ecran, separate printr-un spațiu, primul număr impar și ultimul număr par memorate în tablou. Dacă
nu există două astfel de numere, se afișează pe ecran mesajul nu exista.
Exemplu: pentru n=7 și tabloul (8,2,0,5,9,4,1)se afișează pe ecran numerele 5 4
iar pentru n=7 și tabloul (9,3,1,5,5,9,1)se afișează pe ecran mesajul nu exista (10p.)
3. Un interval este numit prieten de grad n al unui șir dacă toate cele n numere întregi care aparțin
intervalului sunt valori ale unor termeni ai șirului.
Fișierul bac.txt conține un șir de cel mult 106 numere naturale din intervalul [0,102], separate
prin câte un spațiu. Se cere să se afișeze pe ecran numărul maxim n cu proprietatea că există un
interval prieten de grad n al șirului aflat în fișier. Proiectați un algoritm eficient din punctul de vedere
al timpului de executare.
Exemplu: dacă fișierul conține numerele
10 10 11 3 4 2 49 4 2 3 21 2 27 11 10 14 15 5
atunci se afișează pe ecran 4 (toate cele 4 numere întregi din [2,5] sunt termeni ai șirului).
a) Descrieți în limbaj natural algoritmul proiectat, justificând eficiența acestuia. (2p.)
b) Scrieți programul Pascal corespunzător algoritmului proiectat. (8p.)
Probă scrisă la informatică MODEL
Limbajul Pascal
Filieră teoretică, profil real, specializare științe ale naturii
Pagina 2 din 2
Alte subiecte la Informatică – Pascal – Științele naturii
2026 · Simulare
Informatică
Pascal – Științele naturii
Subiect
· Barem
2026 · Model de subiect
Informatică
Pascal – Științele naturii
Subiect
· Barem
2025 · Sesiunea iunie–iulie
Informatică
Pascal – Științele naturii
Subiect
· Barem · Var. 01
2025 · Simulare
Informatică
Pascal – Științele naturii
Subiect
· Barem
2025 · Model de subiect
Informatică
Pascal – Științele naturii
Subiect
· Barem
2024 · Sesiunea iunie–iulie
Informatică
Pascal – Științele naturii
Subiect
· Barem · Var. 03
2024 · Model de subiect
Informatică
Pascal – Științele naturii
Subiect
· Barem
2023 · Sesiunea iunie–iulie
Informatică
Pascal – Științele naturii
Subiect
· Barem · Var. 05
2023 · Sesiunea august
Informatică
Pascal – Științele naturii
Subiect
· Barem · Var. 07
2023 · Simulare
Informatică
Pascal – Științele naturii
Subiect
· Barem
2023 · Model de subiect
Informatică
Pascal – Științele naturii
Subiect
· Barem
2022 · Sesiunea iunie–iulie
Informatică
Pascal – Științele naturii
Subiect
· Barem · Var. 01