Peça ao usuário para digitar três valores inteiros e imprima a soma deles.
Soluções para a tarefa
Respondido por
0
' Como não foi estipulada a linguagem, escolhi Basic
Dim inp(2) As Integer
For x As Integer = 0 To 2
inp(x) = Val(InputBox("Digite o inteiro número " & x + 1))
Next
MsgBox("A soma dos três numeros inteiros é " & inp(0) + inp(1) + inp(2))
Dim inp(2) As Integer
For x As Integer = 0 To 2
inp(x) = Val(InputBox("Digite o inteiro número " & x + 1))
Next
MsgBox("A soma dos três numeros inteiros é " & inp(0) + inp(1) + inp(2))
Perguntas interessantes