Solução dos problemas da categoria Iniciante potigol#27

Problema 1789 - A Corrida de Lesmas
arioston · Oct 5, 2019 · d121a85 · d121a85
1 parent cd9836c
commit d121a85
Show file tree

Hide file tree

Showing 2 changed files with 15 additions and 1 deletion.
diff --git a/categorias/iniciante.md b/categorias/iniciante.md
@@ -2,7 +2,7 @@
 
   - [ ] [1478](https://www.urionlinejudge.com.br/judge/pt/problems/view/1478) - Matriz Quadrada II
   - [X] [1541](https://www.urionlinejudge.com.br/judge/pt/problems/view/1541) - Construindo Casas
-  - [ ] [1789](https://www.urionlinejudge.com.br/judge/pt/problems/view/1789) - A Corrida de Lesmas
+  - [X] [1789](https://www.urionlinejudge.com.br/judge/pt/problems/view/1789) - A Corrida de Lesmas
   - [ ] [1827](https://www.urionlinejudge.com.br/judge/pt/problems/view/1827) - Matriz Quadrada IV
   - [ ] [1837](https://www.urionlinejudge.com.br/judge/pt/problems/view/1837) - Prefácio
   - [ ] [1848](https://www.urionlinejudge.com.br/judge/pt/problems/view/1848) - Corvo Contador

diff --git a/src/1701-1800/1789.poti b/src/1701-1800/1789.poti
@@ -0,0 +1,14 @@
+var n := leia_texto
+
+enquanto n <> None.orNull faça
+    var velocidades := leia_inteiros(" ")
+    var maior_velocidade := velocidades.injete(0)((a, b) => se a > b então a senão b fim)
+
+    escolha maior_velocidade
+        caso velocidade se velocidade < 10 => escreva "{1}"
+        caso velocidade se velocidade < 20 => escreva "{2}"
+        caso _ => escreva "{3}"
+    fim
+
+    n := leia_texto
+fim