Fundamento De Programação

1a

Questão (1,0 pontos)

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.

25

25 16

25 16 9

25 16 9 4

25 16 9 4 1

Se n < 1, uma mensagem de erro deve ser apresentada no vídeo.

2a

Questão (1,5 pontos)

Faça um programa em Pascal que leia números positivos do teclado, até que o número zero

seja digitado, e escreva na tela:

(a) quantos foram os números lidos;

(b) a média dos números lidos;

(c) o maior número lido;

(d) o menor número lido;

(e) o maior número par lido (caso algum número par tenha sido digitado);

(f) o menor número par lido (caso algum número par tenha sido digitado);

(g) o maior número ímpar lido (caso algum número ímpar tenha sido digitado);

(h) o menor número ímpar lido (caso algum número ímpar tenha sido digitado); 3a

Questão (1,0 pontos)

Faça uma versão recursiva (sem utilizar repetição) do programa da 1a

Questão.

4a

Questão (2,5 pontos)

Utilizando as operações randomize e random, faça um programa em Pascal, contendo

subprogramas que:

(a) gere um vetor de dimensão 10, com números aleatórios no intervalo [10,99];

(b) escreva no vídeo o conteúdo do vetor;

(c) escreva no vídeo o elemento mais frequente (se houver empate escreva um deles);

(d) escreva no vídeo todos os elementos que não tenham nenhum elemento adjacente

primo.

5a