Lista completa de Questões de Informática / Microinformática do ano 0000 para resolução totalmente grátis. Selecione os assuntos no filtro de questões e comece a resolver exercícios.
Observe o trecho: ------------------------------------------------------------------------------ 03 NIVEL-ESCOLAR PIC 99. 88 PRIMEIRO-GRAU VALUE 1 THRU 8. 88 SEGUNDO-GRAU VALUE 9 THRU 11. 88 TERCEIRO-GRAU VALUE 12. ------------------------------------------------------------------------------ O comando IF PRIMEIRO-GRAU ................................ ................................ corresponde a:
IF NIVEL-ESCOLAR > 1 AND NIVEL-ESCOLAR < 8
IF NIVEL-ESCOLAR GREATER THAN 0 OR NIVEL-ESCOLAR LESS THAN 9
IF NIVEL-ESCOLAR GREATER THAN 1 OR NIVEL-ESCOLAR LESS THAN 8
Nenhuma das opções, pois daria erro de compilação por não ter, o IF, nenhuma condição (comparação)
IF NIVEL-ESCOLAR > 0 AND NIVEL-ESCOLAR < 9
Observe o comando
INSPECT PALAVRA TALLYING CONTA FOR ALL "L"
REPLACING LEADING "A" BY "E" AFTER INITIAL "L".
Se, inicialmente, PALAVRA for igual a MALLA SELA e LAMA o conteúdo final de CONTA e PALAVRA será:
Um dos recursos utilizados para eliminar a programação repetida de rotinas e, além disso, padronizar procedimentos é a gravação de trechos de programas COBOL em bibliotecas e "anexá-los" ao programa, em tempo de compilação, através do comando
Em um programa de crítica deve-se verificar se o campo NOME é um campo alfabético (podendo possuir também o caracter ' (apóstrofe)) sem alterar seu conteúdo. Assinale o trecho correto, considerando que NOME e NOME-AUX foram definidos como PIC X(40).
INSPECT NOME REPLACING ALL "'" BY SPACES. IF NOME IS ALPHABETIC
MOVE NOME TO NOME-AUX. INSPECT NOME-AUX REPLACING ALL "'" BY SPACES. IF NOME-AUX IS NOT NUMERIC
MOVE NOME TO NOME-AUX. INSPECT NOME-AUX REPLACING ALL "'" BY SPACES. IF NOME-AUX IS ALPHABETIC
INSPECT NOME REPLACING ALL "'" BY SPACES. IF NOME IS NOT NUMERIC
Dados os registros:
podemos afirmar que:
apenas dois campos de REGISTRO não serão alterados;
o comando dará erro de compilação, pois a variável NUMERO está repetida;
REGISTRO ficará com o mesmo conteúdo de REG;
REG ficará com o mesmo conteúdo de REGISTRO;
REG e REGISTRO não se alterarão, pois o comando não moverá nenhum campo.
Dado o trecho de programa
Assinale a opção verdadeira:
O programa dará INVALID OPERATOR porque a variável FIM-ARQUIVO não foi inicializada;
O comando PERFORM dará erro de compilação, pois LE-ARQ e PROCESSA devem ser nomes de seções;
O trecho LE-ARQ ... PROCESSA será executado uma única vez;
O trecho LE-ARQ ... PROCESSA será executado até que o fim de ARQUIVO seja encontrado, ou seja, será executado tantas vezes quantos forem os registros a serem lidos;
O trecho LE-ARQ ... PROCESSA não será executado nenhuma vez.
Para que o comando SEARCH fique sintaticamente correto, ?????????????? deverá ser substituído por:
O comando SET INDEST TO 1.
faz o programa entrar em loop, pois a pesquisa será realizada sempre no primeiro elemento da tabela
poderia ser substituído por COMPUTE INDEST = 1
é desnecessário, pois a pesquisa realizada pelo SEARCH é binária
faz a pesquisa ser realizada a partir do primeiro elemento da tabela
poderia ser substituído por MOVE 1 TO INDEST
O comando utilizado para separar um conjunto de caracteres contido em um único campo em múltiplos campos é:
Caso NATURAL não conste da tabela:
{TITLE}
{CONTENT}
{TITLE}
Aguarde, enviando solicitação...