Question

Me ajude neste pseudocódigos ?
1 .Ler valores enquanto os mesmos forem ímpares. Imprimir se o número lido é positivo ou negativo. Parar quando um número par for lido.
2,Ler idades de várias pessoas. Imprimir no final a média das idades dessas pessoas. Parar quando um número não positivo for lido. Esse número não positivo não deve entrar no cálculo da média.
3. Leia três números que indicam lados de um triângulo. Imprimir se o triângulo é equilátero (3 lados iguais), isósceles (2 lados iguais) ou escaleno (3 lados diferentes). No final, perguntar se o usuário deseja ler outro triângulo. Repetir se for digitado “SIM”.

Answer 1

Programa: LEITURA;
inteiro: N;
repita:
escreva ("Digite um numero")
leia(N);
se N mod 2 <> 0 entao
escreva ("numero negativo")
fimse
ate que N mod 2=0
escreva ("numero positivo)
fimalgoritimo

_______________________--
Ler idades de várias pessoas. Imprimir no final a média das idades dessas pessoas. Parar quando um número não positivo for lido. Esse número não positivo não deve entrar no cálculo da média
.
Programa: MEDIA;
inteiro: IDADE,CONT,MD;
real: S;
MD=0;
CONT=1
repita:  
escreva ("Digite a idade")
leia(ID);
se ID > 0 entao
MD=MD+ID;
CONT=CONT+1;
senao
escreva ("Idade invalida")
ate que ID < 0;
S=MD/CONT;
escreva (S);
fimalgoritimo

-______________-
programa TRIANGULO;
real: A,B,C
inicio
 escreva("entre com o valor de a: ")
leia(a)
escreva("entre com o valor de b: ")
leia(b)
escreva("entre com o valor de c: ")
leia(c)
se (A<B+C) e (B<A+C) e (C<A+B)entao
  escreval("Estes valores formam um triangulo")
se (A=B) e (B=C) entao
    escreva ("Triangulo Equilátero")
   senao se (A=B) ou (B=C) ou (A=C)entao
    escreva ("Triângulo Isósceles") senao escreva ("Triangulo Escaleno")
 fimse
fimse
senao
   escreva ("Estes valores não formam um triângulo")
  fimse
fimalgoritmo