HELP PLEASE!!!rezolvarea unui test

#0 by FaTHeR (Power User) (0 mesaje) at 2008-05-13 15:03:36 (901 săptămâni în urmă) - [Link]

Profesoara de Informatica mia dat o lucrare pentru a imi ridica nota la semestru ( Clasa XI) exercitiile imi par grele, rog foarte tare de un oarecare ajutor
Testul:
1. Cum se selectează datele de intrare în metoda testării funcţionale?

2.Precizaţi funcţiile realizate de acest program şi elaboraţi 2 teste structurale pentru verificarea rezultatului:
Program Test_V2;
var x,y,z: real;
begin
write('Introdu x='); readln(x);
write('Introdu y= '); readln

;
if x+y<0 then z:=y*(x-y/3)+sqr(x/y)
else z:=x/(4*y-3);
write('z=', z:5:3);
readln;
end.

3.Precizaţi funcţiile realizate de acest program şi elaboraţi 2 teste funcţionale pentru verificarea rezultatului:
Program Test_VII2;
var c: integer;
begin
write('Introdu c ='); readln(c);
case c of
1..3: writeln('Semestrul I');
4..6: writeln('Semestrul II ');
7..9: writeln('Semestrul III ');
10..12: writeln(''Semestrul IV');
end;
readln;
end.

4..Ce rezultat va returna secvenţa de program:

for i:=1 to 5 do
begin
Setcolor(i);
Rectangle(45+5*i,45+5*i,100+2*i,100+2*i);
End;

5.Care este destinaţia procedurilor ce urmează şi ce argumente primesc
(explicaţi tipul şi rolul parametrilor)
Circle
MoveRel
Bar
Outtext

6.Elaboraţi un program ce conţine 5-10 instrucţiuni, şi pentru el elaboraţi teste de verificare a corectitudinii programului.

7.Care este scopul programării modulare? Ce conţine secţiunea de implimentare?

8.Argumentaţi ce erori conţine Unit-ul dat:
Unit Test2;
type tablou= array[1..100] of real;
var v:tablou;
procedure Citeste(var s:vector);
procedure Afiseaza(var x:vector);
function Med (var x:vector):integer;
function D (var x:vector):integer;
implementation
var s, I,n:integer;
procedure Citeste;
begin for i:=1 to n do readln (s); end;
procedure Afiseaza;
begin for i:=1 to n do writeln (x[i]:6); end;

9. Elaboraţi un program ce apelează la modulul, care efectuiază următoarele:
a) Citeşte valorile componentelor tabelului liniar de la tastatură
b) Afişează elementele tabelului
c) Calculează media aritimetică a elementelor pare

Mesaj util ? Da 0 puncte

1
<< Precedenta Următoarea >>

#1 by Developer (Power User) (0 mesaje) at 2008-05-13 15:19:12 (901 săptămâni în urmă) - [Link]

nam cind acuma sa citesc toata prostia asta..!

Mesaj util ? Da 0 puncte

1
<< Precedenta Următoarea >>

Forum Index > Coș cu teme șterse > Invatamint > HELP PLEASE!!!rezolvarea unui test

Această temă este închisă. Nu puteţi posta mesaje noi.