Bacalaureat 2019
Sesiunea august
Pascal – Științele naturii 3h
Informatică 2019
Informatică – Pascal – Științele naturii – Bacalaureat 2019, sesiunea august (varianta 02)
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
Varianta 2
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. O expresie Pascal care are valoarea false este:
a. ’m’<’n’ b. ’m’=’M’
c. ’M’=chr(ord(’m’)+ord(’N’)-ord(’n’)) d. ’N’=chr(ord('M’)+1)
2. În secvența alăturată toate variabilele sunt întregi. Indicați expresia s:=0;
cu care pot fi înlocuite punctele de suspensie, astfel încât, în urma for i:=1 to 10 do
executării secvenței obținute, să se afișeze valoarea sumei primelor s:=s+..........;
20 de numere naturale nenule.
a. 21 b. 10 c. i d. 2*i
3.
Tablourile unidimensionale S1, S2 şi S3 sunt scrise alăturat. S1=(7,16,27,47,52);
Algoritmul de căutare binară se poate aplica direct, fără alte S2=(21,69,36,24,16);
prelucrări prealabile: S3=(99,83,71,59,25,12).
a. doar tabloului S1 b. doar tablourilor S1 şi S3
c. doar tablourilor S2 şi S3 d. oricăruia dintre cele trei tablouri
4. Variabila x este de tip real şi are o valoare pozitivă. O expresie Pascal care are ca valoare partea
fracţionară a numărului memorat în variabila x este:
a. round(x)-x+1 b. round(x) c. x-trunc(x) d. x div 10
5. În secvenţa alăturată toate variabilele sunt de tip întreg ok:=1;d:=2;
(n>1). Indicaţi expresia cu care pot fi înlocuite punctele de while (ok=1) and (......) do
suspensie astfel încât, în urma executării secvenţei if n mod d=0 then ok:=0
obţinute, variabila ok să aibă valoarea 1 dacă şi numai else d:=d+1;
dacă numărul memorat în variabila n este prim.
a. d+d<n b. d+d>=n c. d*d<n d. d*d<=n
SUBIECTUL al II-lea (40 de puncte)
1. Algoritmul alăturat este reprezentat în pseudocod. citeşte n
S-a notat cu a%b restul împărţirii numărului natural a la numărul (număr natural)
natural nenul b şi cu [c] partea întreagă a numărului real c. m 0; x 1
┌cât timp x≤9 execută
a) Scrieţi valoarea afişată dacă se citește numărul 27102. (6p.) │ cp n
b) Scrieţi trei numere distincte din intervalul [10,9999] care pot │┌cât timp cp≠0 execută
fi citite, astfel încât în urma executării algoritmului, pentru ││┌dacă cp%10=x atunci
fiecare dintre acestea, valoarea afişată să fie 11. (6p.) │││ m m*10+x
││└■
c) Scrieţi programul Pascal corespunzător algoritmului dat. (10p.) ││ cp [cp/10]
│└■
d) Scrieţi în pseudocod un algoritm, echivalent cu cel dat,
│ x x+1
înlocuind prima structură cât timp…execută cu o structură └■
de tip pentru…execută. (6p.) scrie m
Probă scrisă la informatică Varianta 2
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 reale x și y memorează abscisa, respectiv ordonata unui punct în sistemul de
coordonate xOy. Scrieți o secvență de instrucțiuni Pascal prin care se afișează pe ecran mesajul
interior, dacă punctul precizat mai sus se află în interiorul sau pe conturul unui cerc cu centrul în
originea sistemului de coordonate și raza egală cu 1, sau mesajul exterior, în caz contrar. (6p.)
3. Variabilele i şi j sunt de tip întreg. Scrieţi for i:=1 to 5 do
secvenţa alăturată, înlocuind punctele de begin for ..... do
suspensie astfel încât, în urma executării write(j,' ');
secvenţei obţinute, să se afişeze pe ecran, writeln
în această ordine, numerele de mai jos. end;
5 4 3 2 1
4 3 2 1
3 2 1
2 1
1 (6p.)
SUBIECTUL al III-lea (30 de puncte)
1. Se citesc două numere naturale, a și b (2≤a<b), și se cere să se scrie cel mai mare număr natural
din intervalul [a,b] pentru care produsul divizorilor săi impari pozitivi este strict mai mare decât el
însuși sau 0 dacă nu există niciun astfel de număr. Scrieți, în pseudocod, algoritmul de rezolvare
pentru problema enunțată.
Exemplu: dacă a=14 și b=19, atunci se scrie 18 (1·3·9=27>18). (10p.)
2. Numim segment de dimensiune m al unui tablou unimensional, tabloul obținut din acesta păstrând
doar elementele aflate pe primele m poziții ale sale.
∈[2,20]), apoi cele n
Scrieţi un program Pascal care citeşte de la tastatură un număr natural, n (n∈
elemente ale unui tablou unidimensional, numere naturale din intervalul [0,104].
Programul determină un segment de dimensiune maximă al tabloului citit, cu toate elementele egale,
și afișează pe ecran valoarea acestei dimensiuni.
Exemplu: pentru n=5 și tabloul (2,2,2,5,2), se afişează pe ecran 3. (10p.)
3. Fişierul bac.txt conţine un şir de cel mult 106 numere naturale din intervalul [0,103], separate
prin câte un spaţiu. Șirul are cel puțin doi termeni pari.
Se cere să se afișeze pe ecran toți termenii pari ai șirului, în ordine crescătoare, separați prin câte
un spaţiu, ca în exemplu. Proiectați un algoritm eficient din punctul de vedere al timpului de
executare.
Exemplu: dacă fişierul are conţinutul
12 2 3 1 2 5
se afişează pe ecran:
2 2 12
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ă Varianta 2
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