Baixe o app para aproveitar ainda mais
Prévia do material em texto
Página 1 de 2 01 O nome de uma variável é criado por um programador devendo seguir algumas regras, são exemplos de nomes válidos, EXCETO: (A) Nota1, Nota2, Nota3 (B) Aluno, aluno1, alunos (C) tres, treze, 3_tres (D) Tipo_camisa, T_tenis, tamanho (E) Media, aprovado, reprovado 02 Sendo A = 5, B = 3 e C = 7, análise as operações a seguir e marque a opção correta. (V é verdadeiro e F é falso) 1. A + B = C 2. B + C < A 3. C < A * B 4. B + C = 2 * A 5. C / B > A (A) F – F – V – V – F (B) V – F – V – V – F (C) F – F – V – V – V (D) F – V – V – V – F (E) F – V – F – V – F 03 Observe as operações e assinale qual será o valor do X e do Y, respectivamente. X = 3 * 2 + 5 / 2 - 3 ^ 2 + Sqr(4) Y = Sqr(9) - (5 / 2) + (3 Mod 1) (A) X = 2.5 e Y = 5 (B) X = 1.5 e Y = 3 (C) X = 2 e Y = 1.5 (D) X = 1.5 e Y = 0.5 (E) X = 1 e Y = 3 04 Análise a expressão e marque qual será o valor de D. A = 6 B = 4 C = 12 D = (C / A) + B – (A Mod B) * (A / B) (A) D = 7 (B) D = 13 (C) D = 4 (D) D = 22 (E) D = 3 05 Em Visual Basic, qual é o tipo que uma variável não declarada assume por padrão (default)? (A) Object (B) Private (C) Variant (D) Range (E) Nenhuma das alternativas acima 06 Analise o programa e marque qual a sua saída se as entradas forem 62 e 32, respectivamente. Sub Exercicio_06() Dim A As Integer Dim B As Integer B = InputBox("Digite o 1º nr inteiro:") A = InputBox("Digite o 2º nr inteiro:") If A > B Then B = (A + B) End If If (A < B) Then A = (B / 2) End If MsgBox ??? End Sub (A) 62 (B) 32 (C) 31 (D) 34 (E) 93 07 Escolha a condição que gera a saída 13. Sub Exercicio_07() Dim num1 As Integer Dim num2 As Integer num1 = 13 num2 = 22 If (?????) Then MsgBox (num2) Else MsgBox (num1) End If End Sub Disciplina: Programação em Microinformática – Exercício (04) FATEC – Faculdade de Tecnologia de Ribeirão Preto Nome: ________________________________________ Código: ______________ Página 2 de 2 (A) (num1 > num2) Or (num2 < 20) (B) (num2 > num1) And (num2 < 25) (C) (num1 > num2) Or (num1 < 20) (D) (num1 = num2) Or (num2 < 25) (E) (num1 <> num2) And (num2 <> 20) 08 Quais serão as saídas do programa a seguir se primeiro as entradas forem, respectivamente, 2, 3 e 5, e então o programa será executado novamente, mas com as entradas 10, 2 e 3. Sub Exercicio_08() Dim X As Integer Dim Y As Integer Dim Z As Integer X = InputBox("Digite o 1º nr") Y = InputBox("Digite o 2º nr") Z = InputBox("Digite o 3º nr") If ((X > Y) And (Y * Z < X)) Then MsgBox (Z * Y) Else MsgBox (X + Z * Y) End If End Sub (A) Primeira saída é 25 e a segunda é 22 (B) Primeira saída é 17 e a segunda é 6 (C) Primeira saída é 13 e a segunda é 18 (D) Primeira saída é 17 e a segunda é 16 (E) Primeira saída é 6 e a segunda é 17 09 Quais serão as entradas do programa a seguir se a saída for 2. Sub Exercicio_09() Dim A As Integer Dim B As Integer Dim C As Integer C = InputBox("Digite o 1º nr") B = InputBox("Digite o 2º nr") A = InputBox("Digite o 3º nr") If ((C > B) Or (A * B > C)) Then MsgBox (A) Else MsgBox (B + C) End If End Sub (A) A=3, B=2, C=13 (B) A=1, B=11, C=1 (C) A=5, B=4, C=17 (D) A=7, B=2, C=9 (E) A=2, B=3, C=5 10 Qual será à saída do programa se as entradas forem, respectivamente, 4, 7 e 4. Sub Exercicio_10() Dim A As Integer Dim B As Integer Dim C As Integer A = InputBox("Digite o 1º nr") B = InputBox("Digite o 2º nr") C = InputBox("Digite o 3º nr") If ((A <> 0) And (B <> 0) And (C <> 0)) Then If ((A = B) And (B = C)) Then MsgBox (A + C) Else If ((A = B) Or (A = C) Or (C = B)) Then MsgBox (A + B) Else MsgBox (B - C) End If End If Else MsgBox (A + B + C) End If End Sub (A) 3 (B) 4 (C) 7 (D) 11 (E) 15
Compartilhar