TEMA

Pentru fixarea cunostintelor dobândite pâna în prezent, înainte de a trece mai departe, este bine sa rezolvati aceste teme. Dupa rezolvarea lor puteti selecta o noua converstie.

Întrebari de control
Probleme

ÎNTREBARI .DE .CONTROL

Care din urmatoarele numere nu sunt numere reale atribuite legal si de ce ?

a) -.3	b) 2/3	c) + 0.99
d) 2	e) 2.	f) -6F12
g) 3805,93	h) 7.3e-3	i) 3.0 + 7.5i

Pentru enuntul

TYPE

gama=(do,re,mi,fa,sol,la,si);

precizati rezultatul evaluarii urmatoarelor functii:

a) succ(mi)

b) pred(re)

c) pred(do)

d) succ(si)

e) ord(la)

Când poate fi septembrie..aprilie un subdomeniu legal ?
Declaratia:

VAR

nota:9..9;

este acceptata de (Borland) PASCAL. De ce ?

Cele doua declaratii au o trasatura comuna

TYPE

grad=(preparator,asistent,lector,lector,conferentiar)

gama=(do, re, mi, fa, sol, la, si, do);

Rescrieti cele doua declaratii de mai sus pentru a reflecta scopurile lor.

Scrieti declaratiile si expresiile pentru un set constituit din:

lunile din an al caror nume contine un singur "r";

majusculele care nu sunt vocale;

cel mai mare set posibil de valori de tip boolean;

toate caracterele ASCII, altele decât litere, cifre si caractere de control;

toate numerele pare prime mai mari ca 2;

toate zilele din saptamâna, exceptând ziua în care se joaca meciurile din cupele europene (miercuri).

Care este:

cel mai mare întreg "n" care poate fi folosit ca argument al functiei exp?

cel mai mare întreg "n" care poate fi folosit ca argument al functiei sqr?

Nota:

Se presupune ca maxreal a fost definit corespunzator.

Considerati ca functiile trunc si round sunt necesare amândoua? Care este fundamentala si de ce ?

PROBLEME

Scrieti un program care calculeaza si tipareste valoarea expresiei:
E=1-(sin²A+cos²A)
pentru valori ale unghiului A de la 0 la 6 radiani, cu pasul de 1 radian. Analizati rezultatele.

Scrieti un program care tipareste valorile:

a) 4*arctan(1)

b) exp(1)

c) sqrt(2)

în vederea testarii preciziei definite de compilatorul (Borland) PASCAL cu care lucrati pentru: pi, e si radical din 2. (Precizia tine de tipul de data si generarea de cod, nu numai de compilatorul propriu-zis !)

Completati programul de mai jos, ale carui functii sunt precizate de comentariile listate.

PROGRAM arie;
{Programul tipareste aria triunghiului/dreptunghiului/elipsei/sectorului de cerc în functie de elementele a si b}
TYPE
...figura=(triunghi, dreptunghi, elipsa, sector, UFO);

VAR
...obiect:figura; {variabile de intrare}
...a,b:real; {dimensiunea obiectului}
...aria:real; {variabila de iesire:rezultat final}

PROCEDURE readobiect(VAR obiect:figura; VAR a,b:real);
VAR
...obj:char;
BEGIN
...readln(obj,a,b);
...IF obj = 'T' THEN obiect:=triunghi ELSE
...IF obj = 'D' THEN obiect:=dreptunghi ELSE
...IF obj = 'E' THEN obiect:= elipsa ELSE
...IF obj = 'S' THEN obiect:=sector ELSE
...obiect:=UFO
END {readobiect};

BEGIN {program principal}
{Completati aceasta zona}
END {arie}.

Nota:

Pentru calculul ariilor, utilizati formulele: aria elipsei=P ab; aria sectorului=P a²b/360;
aria dreptunghiului=a*b; aria triunghiului=a*b/2.

Scrieti un program PASCAL care citeste de pe o linie de date: plata/ora, urmata de valori întregi care reprezinta numarul de ore de service calculatoare, efectuate într-o saptamâna de un inginer electronist. De exemplu, un inginer care are un salariu de 4089,50 lei/ora si efectueaza diverse servicii în timpul unei saptamâni (luni 6 ore, marti si miercuri 8 ore, joi 5,5 ore, vineri 3,5 ore, sâmbata 2 ore si duminica 1,5 ore), va fi identificat prin urmatoarea linie de date:

4089.50...6...8...8...5.5...3.5...2...1.5

Calculati si afisati venitul total saptamânal, al unui inginer service calculatoare respectând urmatoarele reguli:

orele efectuate în zilele de luni-vineri se platesc normal;
orele efectuate duminica se platesc dublu;
orele efectuate sâmbata se platesc majorate cu 50%.

Nota: Utilizati tipul enumerare pentru identificarea zilelor saptamânii. Utilizati una din functiile matematice studiate în vederea afisarii totalului general pâna la cel mai semnificativ ban.