RaizQ

Se quiser, baixe esse app ¬ Visualg, copie o código, cole, teste, altere, treine, seja feliz! Sorria! Mesmo, se o mudo fizer careta (RS!).

Exercícios

algoritmo "RaizQ"

var

A: real

inicio

A <- RaizQ(25)
Escreva ("A raiz quadrada de 25 é:", A)

fimalgoritmo

Exercício 2

algoritmo "RaizQ - Interativo"

var

N1, R: real
N, RESP, NOME: caractere

inicio

repita Escreval("Qual seu NOME?")
leia (NOME)
limpatela
Escreval (NOME,", digite um número:")
Escreva("Nº: ")
leia(N1)
limpatela
Escreval("Você digitou o número ",N1)
Escreval("")
R <- RaizQ(N1)
Escreval (NOME,", a raiz quadrada de", N1, " é: ",R)
Escreval ("Deseja continuar ",NOME," [S/N]?")
Escreva("Resposta: ")
leia(RESP)
ate(RESP="N")
limpatela
Escreval("")
Escreval("--------------------FIM-------------------")
Escreval(" Volte sempre ", NOME,"." )