Escreva um algoritmo para calcular a área de um círculo, fornecido o valor do raio, que deve ser
positivo ou zero.
Algoritmo " Calcular a área de um círculo"
var
area, raio: real
inicio
escreval (" Entre com o raio")
leia (raio)
se (raio>=0) entao
area <- 3.14*(raio^2)
escreva(" O valor da area é :", area)
senao
escreva ("O raio não pode ser negativo")
fimse
fimalgoritmo
Quais os valores armazenados em SOMA, NOME e TUDO após executados os passos abaixo,
supondo-se que NUM, X, COR, DIA, TESTE e COD valem, respectivamente, 5, 2, “AZUL”, “TERÇA”,
FALSO e VERDADEIRO?
1. NOME <- DIA ( Terça)
2. SOMA <- (NUM^2/X) + (X + 1) (15,5)
3. TUDO <- não ((TESTE ou COD) e (X <> NUM)) Falso
var
a,b:inteiro
inicio
escreva (" valor A:")
leia (a)
escreva (" valor B:")
leia (b)
se (a>b)entao
se (a mod b = 0)entao
escreva ("E multiplo")
senao
escreva ("Não multiplo")
fimse
senao
se (b>a)entao
se (b mod a = 0)entao
escreva ("E multiplo")
senao
escreva ("Não multiplo")
fimse
fimse
fimse