Probleme şi programe de la teze din aniiprecedenţi
Pregatirea de teză
Сообщений 1 страница 5 из 5
Поделиться22009-12-01 19:18:42
1. Se consideră antetul: function f(x:real,; y:integer; z:char):Boolean;
Care din apelurile ce urmează sunt corecte. Argumentati raspunsul.
a) F(5.20,4 ‘a’)
b) F(7.0,7,7)
c) F(8.34, 4, ‘7’)
d) F(5.20, 4, ‘7.12)
2. Elaboraţi o funcţie care returnează aria unui triunghi cu lungimile laturilor a, b, c : reale.
3. Elaboraţi o procedură determină numărul de cuvinte dint-o propoziţie, dacă propoziţia se termină cu punct şi cuvintele sunt separate prin spaţiu.
4. Scrieţi o funcţie recursivă şi una iterativă care calculează suma:
42 +82+122+....+(4*n)2
Valoarea n se transmite in funcţie în calitate de parametru.
5.Completaţi spaţiile libere în următoarele propoziţii astfel încît acestea să devină afirmaţii adevărate:
A) Subprogramul care se autoapelează se numeşte subprogram________________________
b) Parametru care se conţine în antetul subprogramului se numeşte______________________
c) Variabilele declarate în secţiunea var din subprogram se numesc variabile______________
d) Subprogramul care în antet conţine tipul rezultatului se numeşte______________________
Поделиться32009-12-09 19:20:02
3.
procedure np(s:string; i:integer);
var j:integer;
begin
i:=0;
for j:=1 to length(s) do
if s[j] in [' ','.'] then i:=i+1
end;
Поделиться42009-12-09 19:59:47
4.
a) recursiv
function sum(n:integer): integer;
begin
if n=1 then sum:=42
else sum:=40*n+2+sum(n-1)
end;
b) iterativ
function sum(n:integer):integer;
i,s :integer;
begin s:=0
for i:=1 to n do
s:=s+40*i+2;
sum:=s;
end;
Поделиться52009-12-10 19:12:21
VA MULTUMESC MULT.NE VA FI DE AJUTOR PENTRU PREGATIREA DE TEZA.