Um tipo enumerado e uma sequencia ordenada de identificadores definidos pelo usuario, que forma um tipoordinal. A palavra reservada para criac ao de tipos enumerados e type.Type semana = (segunda, terca, quarta, quinta, sexta, sabado, domingo);Uma das mais importantes caracteristicas de um tipo enumerado e a ordem na qual os valores saoordenados. Alem de estabelecer os proprios identificadores, a declaracao do mesmo define a ordem dosidentificadores no tipo.Exemplo:Program ex7;uses crt;type cores = (preto, azul, vermelho, amarelo, verde, rosa, branco, roxo, lilas);varuma_cor: cores;beginclrscr;uma_cor := roxo; {atribuir um identificador a variavel de tipo}uma_cor := succ(uma_cor); {recebeu lilas, o sucessor}uma_cor := pred(uma_cor); {recebeu roxo novamente, o antecessor}uma_cor := succ(azul); {recebeu vermelho, sucessor de azul}if succ(uma_cor)>=lilas thenuma_cor := preto;writeln(ord(uma_cor)); {escreveu 2, a ordem do vermelho}uma_cor := preto;writeln(ord(uma_cor)); {escreveu 0, a ordem do preto}for uma_cor := preto to rosa dowriteln(ord(uma_cor)); {escreveu as posicoes, do preto ao rosa}end. Vamos agora aprender uma estrutura de decisao, o que e isso? e o que vai direcionar voce a algum lugar, se voce tiver uma opcao voce vai ter que decidir em qual ir, ela que vai fazer isso pra voce.vamos a praticaprogram ex1;varnome:string;idade,op:integer;beginwriteln('Digite seu nome'); readln(nome);writeln('Digite sua idade');readln (idade);writeln('O que voce quer ver primeiro?');writeln('1-Nome ou 2-Idade');read(op);if (op=1) thenbeginwriteln('Seu nome e: ', nome);endelse beginwriteln('Sua idade e: ', idade);end;end.Agora vamos as explicacoes:1-Declarei as variaveis NOME do tipo INTEGER e IDADE do tipo INTEGER.2-Pedi para o usuario digitar o nome, li o nome, pedi a idade e li a idade.3-A variavel OP foi criada para auxiliar no IF, ele que vai dizer pra onde vamos, como eu pedi para ele digitar os numeros 1 ou 2 essa variavel tem que ser do tipo integer.4-Apos voce escolher entre 1 e 2 ele vai ler sua resposta READLN(OP).5-Agora vem o IF, que quer dizer SE em portugues, ou seja se OP for igual ao numero 1 IF (OP=1) THEN escreva na tela SEU NOME E: E O NOME DIGITADO.6-Agora vem o else que faz parte do IF, ele quer dizer algo como se nao for a opcao anterior va para a proxima, ou seja se nao digitar o numero 1 escreva SUA IDADE E: E A IDADE DIGITADA. 7-Antes do else o end anterior nao pode ter ponto e virgula.8-O IF tem um BEGIN para inserir o WRITELN, lembre sempre de colocar o END; para terminar esse BEGIN.Bem ,esse e o IF. Array UnidimensionalA estrutura do tipo vetor e a mais conhecida dos programadores por ser a estrutura mais simples de serimplementada. Suas caracteristicas basicas sao:E uma estrutura homogenea, isto e, formada de elementos de mesmo tipo, chamado tipo base.Todos os elementos da estrutura sao igualmente acessiveis, isto e, quer dizer que o tempo e o tipo deprocedimento para acessar qualquer um dos elementos do vetor sao iguais.Cada elemento componente da estrutura tem um nome proprio, que e o nome do vetor seguido do indice.A declaracao de um vetor pode utilizar um tipo definido pelo usuario ou simplesmente a especificacao dearray para uma variavelExemplo:Program ex8;uses crt;const max = 50;varnomes: array[1..maximo] of string[20];notas: array[1..maximo] of real;soma, media: real;i: 1..maximo;beginclrscr;soma := 0;for i:=1 to Maximo dobeginwrite(Entre com