Boa, pessoal. Tudo bem?
Estou com uma dúvida em um exercício que fiz. O exercício é esse:
89) Crie um programa que melhore o procedimento Gerador() da questão anterior para que o programador possa escolher uma entre três bordas:
+-------=======------+ Borda 1
~~~~~~~~:::::::~~~~~~~ Borda 2
<<<<<<<<------->>>>>>> Borda 3
Ex: Uma chamada válida seria Gerador("Portugol Studio", 3, 2)
~~~~~~~~:::::::~~~~~~~
Portugol Studio
Portugol Studio
Portugol Studio
~~~~~~~~:::::::~~~~~~~
PS. O exercício anterior:
1) Crie um programa que melhore o procedimento Gerador() da questão anterior para que mostre uma mensagem vário Ex: Ao chamar Gerador("Aprendendo Portugol", 4) aparece:
+-------=======------+
Aprendendo Portugol
Aprendendo Portugol
Aprendendo Portugol
Aprendendo Portugol
+-------=======------+
O jeito que eu consegui fazer é esse:
algoritmo "Ex. 89"
var
Procedimento Gerador()
var
C, Borda: inteiro
B, AP: caractere
Inicio
AP <- "Portugol Studio"
EscrevaL ("+-------=======------+ Borda 1")
EscrevaL ("~~~~~~~~:::::::~~~~~~~ Borda 2")
EscrevaL ("<<<<<<<<------->>>>>>> Borda 3")
Escreva ("Qual borda você escolhe? ")
Leia (Borda)
Escolha Borda
Caso 1
B := "+-------=======------+"
Caso 2
B := "~~~~~~~~:::::::~~~~~~~"
Caso 3
B := "<<<<<<<<------->>>>>>>"
FimEscolha
EscrevaL (B)
Para C <- 1 ate 3 faca
EscrevaL (AP)
FimPara
EscrevaL (B)
FimProcedimento
inicio
Gerador()
fimalgoritmo
Mas para mim parece que não está certo ainda, por que não consegui fazer a chamada igual a que o exercício. E também sinto que poderia encurtar o código, mas não sei como. Agradeço desde já