Finalizei a aula 11

sodiuz · Feb 14, 2025 · c64a6e6 · c64a6e6
1 parent af53f8e
commit c64a6e6
Show file tree

Hide file tree

Showing 2 changed files with 29 additions and 0 deletions.
diff --git a/algoritmos/algoritmos/aula11/COMBINACOES.ALG b/algoritmos/algoritmos/aula11/COMBINACOES.ALG
@@ -0,0 +1,10 @@
+algoritmo "combinacoes"
+var
+   C1, C2 : Inteiro
+inicio
+   Para C1 <- 1 ate 3 faca
+      Para C2 <- 1 ate 3 faca
+         Escreval (C1, C2)
+      FimPara
+   FimPara
+fimalgoritmo
diff --git a/algoritmos/algoritmos/aula11/QUANTOSENTRE0E10.ALG b/algoritmos/algoritmos/aula11/QUANTOSENTRE0E10.ALG
@@ -0,0 +1,19 @@
+algoritmo "quantosentre0e10"
+var
+   C, V, Tot010, SImp : Inteiro
+inicio
+   Tot010 <- 0
+   SImp <- 0
+   Para C <- 1 ate 6 faca
+      Escreva("Digite um valor: ")
+      Leia(V)
+      Se (V >= 0) e (V <= 10) entao
+         Tot010 <- Tot010 + 1
+      FimSe
+      Se (V % 2 = 1) entao
+         SImp <- SImp + V
+      FimSe
+   FimPara
+   Escreval("Ao todo foram ", Tot010, " valores entre 0 e 10")
+   Escreval("Nesse intervalo, a soma de �mpares foi: ", SImp)
+fimalgoritmo