Questão 663589

1_type

2_InfoFuncionario = Record;

3__Nome : String;

4__Salario : Longint;

5__CPF : String[14];

6_end;

7_const FuncionarioA : InfoFuncionario = (Nome := 'Jose', Salario := 1000, CPF := '888.444.222.33');

8_var

9 __FuncionarioB : InfoFuncionario;

10 __Funcionarios : array [1..100] of InfoFuncionario;

11_function ValorTotal(Funcionarios) : Longint;

12_var

13 __i : Integer;

14 __Total : Longint;

15_begin

16 __Total := 0;

17 __for i := 1 to 100

18 __ __Total := Total + Funcionarios[i].Salario;

19 __ValorTotal := Total;

20_end;

21_begin

22 __New(Funcionarios);

23

24 ___begin

25 __ __FuncionarioB.Nome := 'Pedro';

26 __ __FuncionarioB.Salario := 500;

27 __ __FuncionarioB.CPF := '222.444.666.33';

28 ___end;

29

30_end.

Deseja-se manipular as informações relativas a nome, salário e cadastro de pessoa física dos funcionários de uma determinada empresa, por meio de um programa escrito em linguagem Pascal. O programador responsável por essa tarefa escreveu as linhas de programa mostradas acima. Com relação a esse trecho de código e à linguagem Pascal, julgue os itens abaixo.

O programador está utilizando, entre as linhas 1 e 6, a estrutura de dados denominada Record, que permite a definição de um novo tipo que pode ser composto pela associação de diversas variáveis de diferentes tipos previamente definidos. As informações relativas ao "FuncionarioA" estão corretamente inicializadas na linha 7, devendo permanecer constantes até o final da execução do código.