Algoritmo: C:\Users\Lenovo\Downloads\visuAlg.
alg
Data: 11/07/2025
1 Algoritmo "Analise_Numero"
2 Var
3 numero, quadrado: inteiro
4 resposta: caractere
5
6 Inicio
7 resposta <- "S"
8
9 enquanto maiusc(resposta) = "S" faca // <-- Tente esta mudança!
10
11 escreval("Digite um número inteiro:")
12 leia(numero)
13
14 se numero > 0 entao
15 quadrado <- numero * numero
16 escreval("O número é positivo. O quadrado é: ", quadrado)
17 senao
18 se numero < 0 entao
19 escreval("O número é negativo. O valor absoluto é: ", numero * -1)
20 senao
21 escreval("O número é zero.")
22 fimse
23 fimse
24
25 escreval("Deseja continuar? (S para sim / N para não):")
26 leia(resposta)
27
28 fimenquanto
29
30 Fimalgoritmo
31
32
33