Question

Fie următoarele declarații:

Type

Tara=record

Denum:string[15];

Capitala:string[15];

Continent:string[15];

AnInfiintare:integer; end;

ListaTara=array[1..30] of Tara;

Var t:tara; a:listatara;

Bifaţi insrucțiunile corecte.

Alegeți una sau mai multe opțiuni:
a. T:=a[5];
b. If a[5].aninfiintare>1945 and a[5].continent=’Africa’ then writeln;
c. Writeln(t.denum,’ ‘,t.capitala);
d. For i:=1 to 10 do writeln(a[i].denum,’ ‘,a[i].an);

Answer 1

Raspuns corect:
a. T:=a[5];
b. If a[5].aninfiintare>1945 and a[5].continent=’Africa’ then writeln;
c. Writeln(t.denum,’ ‘,t.capitala);
Punctul d. este eronat deoarece an nu este camp al inregistrarii.