Baixe o app para aproveitar ainda mais
Prévia do material em texto
Fundação CECIERJ - Vice Presidência de Educação Superior a Distância Curso de Tecnologia em Sistemas de Computação Disciplina Fundamentos de Programação AD1 1° semestre de 2015. IMPORTANTE: - As respostas (programas) deverão ser entregues pela plataforma em um arquivo ZIP contendo todos os arquivos de código fonte necessários para que os programas sejam testados. - As ADs deverão ser entregues pela atividade "Entrega de AD1" antes da data final de entrega estabelecida no calendário de entrega de ADs. - A AD é um mecanismo de avaliação individual. As soluções podem ser buscadas por grupos de alunos, mas a redação final de cada prova tem que ser individual. 1a Questão (1,0 ponto) Escreva um programa em Pascal que leia do teclado um inteiro n, maior ou igual a 1, e que apresente no vídeo n linhas da forma abaixo. Por exemplo, as seguintes linhas devem ser apresentadas se n = 5. 1 2 3 3 4 5 4 5 6 7 5 6 7 8 9 Se n < 1, uma mensagem de erro deve ser apresentada no vídeo. 2a Questão (2,0 pontos) Faça um programa em Pascal que leia números positivos do teclado, até que o número zero seja digitado (não considere o zero nas estatísticas), e escreva na tela: (a) quantos foram os números lidos; (b) a quantidade de números pares lidos; (c) a quantidade de números primos (2, 3, 5, 7, 11, 13, 17, ...) lidos; (d) o número de vezes em que o número lido foi igual ao seu antecessor; (e) o número de vezes em que o número lido foi maior que o primeiro número lido. 3a Questão (1,0 ponto) Faça uma versão recursiva (sem utilizar repetição) do programa da 1a Questão. 4a Questão (2,0 pontos) Faça um programa em Pascal que leia números inteiros do teclado até que um número negativo seja lido e que escreva no vídeo a soma de todos os números lidos que sejam palíndromos. Definição: um número é palíndromo se e somente o primeiro dígito for igual ao último, o segundo dígito for igual ao penúltimo, e assim sucessivamente. 5a Questão (2,0 ponto) Utilizando as funções randomize e random do Pascal, faça um programa em Pascal que gere um vetor de 100 elementos cujos valores aleatórios devem variar de 1 a 10. Escreva no vídeo o vetor gerado. Identifique neste vetor qual é o valor que mais ocorreu e o que menos ocorreu, e escreva-os no vídeo. Caso haja empate, escreva todos os que mais ocorreram e os que menos ocorreram. 6a Questão (2,0 pontos) Faça um programa em Pascal que leia strings do teclado até que a string vazia seja digitada. Escreva na tela a string de maior comprimento que possua apenas digitos. Além disso, escreva a soma de todos os dígitos lidos e a quantidade de strings lidas. Caso nenhuma string possua apenas dígitos, informe ao usuário.
Compartilhar