diff --git a/lista-06/06/enunciado.txt b/lista-06/06/enunciado.txt
index e69de29bb2d1d6434b8b29ae775ad8c2e48c5391..8559e189923fc843b21150db0f2d5960cf00bade 100644
--- a/lista-06/06/enunciado.txt
+++ b/lista-06/06/enunciado.txt
@@ -0,0 +1,16 @@
+Faça uma procedure que receba como parâmetro um inteiro e retorne este número incrementado de uma unidade. Use esta procedure para fazer funcionar o código abaixo, que imprime todos os números de 1 a 10.
+Teste sua procedure usando o código abaixo.
+
+program incrementa uma unidade;
+var n: longint;
+
+(* coloque aqui o codigo da sua procedure que incrementa uma unidade *)
+
+begin
+    n:= 1;
+    while n <= 10 do
+    begin
+        writeln (n);
+        incrementa (n);
+    end;
+end.