1 Algoritimo circunferência completo

Prévia do material em texto

Algoritimo (circunferência completo)
Var.
N1, N2, N3: Real
Inicio
Exibir digite o valor primeiro ângulo
receba (N1)
Exibir digite o valor segundo ângulo
receba (N2)	
Exibir digite o valor terceiro ângulo
Receba (N3)
S <- N1+N2+N3
R <-360 – S
Exibir (R)
Exibir (deseja continuar digite S ou N para finalizar)
Fimalgoritimo
 
Algoritimo (impares)
Var.
N, E, C= Real
Inicio
C= 0
Faça enquanto C >100
R <- N mod 2
Se R <> 0 então
E <- N
N – 1
C + 1
Retorno linha 4
Fimse
Escreva(E)
Obs. Esse algoritmo não roda No Visual G
 
Algoritimo (“32 bits”)
Var.
C, R, P1, P2, P3, P4, P5, P6, P7, P8, X, X
Inicio:
C= 1
Faça enquanto C <- 4
Receber P1
Receber P2
Receber P3
Receber P4
Receber P5
Receber P6
Receber P7
Receber P8
R <- P1, P2, P3, P4, P5, P6, P7, P8, X, X
C + 1
Exibir R
Fimalgoritimo
Obs. Não roda no Visual G
Algoritimo (“divisível”l)
Var.
R, C, R2, N: inteiro
Inicio:
C = 0
Exibir(“ informe um numero inteiro positivo maior que 50”)
Receber N
Enquanto faça C> = 10
Se N <50 então
Exibir “número incorreto, por favor informar numero maior que 50”
Retornar linha 2
Senão
R <- N-N
Se R=0 então
R2 Mod 10
Fimse
Fimse
Se R2 <> 0 então
Exibir N
Exibir (“não é divisível por 10)
Senão
Exibir N
Exibir (“é divisível por 10”
Obs. Não roda no Visual G