Dúvida com exercícios

[Visitante: ZéTeixeira]

Desafio pascal simples!

1º Programa

Elabora um programa que receba uma linha de texto e conte as vogais apresentando o

respectivo histograma na seguinte forma:

Exemplo:

Linha de texto passada: “Na próxima quarta-feira é feriado.”

a : ****** (6)

e : *** (3)

i : *** (3)

o : ** (2)

u : * (1)

2º Programa

Elabora um programa que receba uma matriz A(7,7) de inteiros e retorne a quantidade de

primos existentes na diagonal principal de A.

Obrigado pela vossa participação..

[gandalfnho]

Poste o que conseguiu fazer para que possamos ajudá-lo:

- Os demais frequentadores do fórum poderão ajudá-lo a tirar dúvidas, mas não irão fazer seu trabalho por você, por isso tente ao menos fazer seus exercícios e poste suas dúvidas, senão nunca irá aprender se fizerem tudo por você.

[Visitante: ZéTeixeira]

Program Trabalho_Pratico;
 Var A: Array[1..7,1..7] of integer;
 	i,j:integer;

 Begin
 	for i:=1 to 7 do begin
 		for j:=1 to 7 do begin
 		readln(A,i,j)

a partir daqui nao consigo fazer mais..

nao sei como retornar a quantidade de primos existentes na diagonal principal de A.

[Simon Viegas]

Program Trabalho_Pratico;

Var A: Array[1..7,1..7] of integer;

i,j:integer;

Begin

for i:=1 to 7 do begin

for j:=1 to 7 do begin

readln(A,i,j)

a partir daqui nao consigo fazer mais..

nao sei como retornar a quantidade de primos existentes na diagonal principal de A.

1º PROGRAMA

Vou passar duas pequenas dicas para ajudar a fazer.

1)Uma String "igual" Array [1..255] of char

Ou seja, podemos manipular String no Pascal da mesma forma que se manipula uma "array de char". Essa característica ajuda para poder pegar cada um dos caracteres da cadeia. Assim se você quiser acessa um caractere, basta passar a posição...

Ex:

var
  palavra :string;
BEGIN
palavra:='Pascal';
writeln(palavra[3]); {vai exibir a 3ª letra, ou seja, "s"}
END.

2) Quantidade de caracteres numa String (tamanho da String)

Um comando para retornar o tamanho dela é o:

Length(<variável>);

Como a quantidade de caracteres na frase pode variar de 0 a 255, é interessante saber a quantidade de letras que o usuário informou, para assim otimizar o algoritmo. (Não precisar verificar sempre 255).

Ex:

var
  palavra :string;
BEGIN
palavra:='Pascal';
writeln(Length(palavra)); {vai exibir 6}
END.

***

Acredito que com essas duas características ajudaram você a responder.

2° PROGRAMA

1) Leitura de matrizes (acessar suas posições)

Como você mesmo declarou, uma matriz, no Pascal, não passa de uma "um array de array", ou seja, um array com duas coordenadas. Na prática é como se cada posição do array tivesse outro array dentro. A matriz como vemos na matemática devem ser vistas como uma forma abstrata desse array duplo, ou seja, definindo uma das coordenadas como sendo a linha e a outro como sendo a coluna.

O acesso vai ser semelhante a de uma array simples, só que com um parâmetro a mais.

readln(mat[2,3]); {no padrão, 2° linha, 3° coluna}

2) Diagonal principal da matriz

Achar principal da matriz quadrada é fácil:

Wikipedia]Numa matriz quadrada A de ordem n × n, chama-se de diagonal principal os elementos aij onde i = j, para i de 1 a n.

Ou seja, de (1,1), (2,2)... até (7,7).

O restante deixo por sua conta..

No aguardo

Abraços