



Sugestão de Solução em Linguagem Algorítmica
mod = calcula o resto da divisão inteira.
Este comando muda conforme a linguagem, exemplo em java é %
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | programa Exercicio29; var num1, num2 : Inteiro; inicio Escreva('Informe o numero 1: '); Leia(num1); Escreva('Informe o numero 2: '); Leia(num2); se (num1 mod 2 = 0) e (num1 mod 3 = 0) entao Escreva('O numero ', num1, ' eh divisivel por 2 e por 3 ao mesmo tempo.'); se (num2 mod 2 = 0) e (num2 mod 3 = 0) entao Escreva('O numero ', num2, ' eh divisivel por 2 e por 3 ao mesmo tempo.'); fim. |
Sugestão de Solução em Pascal, Lazarus, Delphi
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 | program Exercicio29; uses Classes, SysUtils; var num1, num2 : Integer; begin Write('Informe o numero 1: '); ReadLn(num1); Write('Informe o numero 2: '); ReadLn(num2); if (num1 mod 2 = 0) and (num1 mod 3 = 0) then WriteLn('O numero ', num1, ' eh divisivel por 2 e por 3 ao mesmo tempo.'); if (num2 mod 2 = 0) and (num2 mod 3 = 0) then WriteLn('O numero ', num2, ' eh divisivel por 2 e por 3 ao mesmo tempo.'); { Outra opcao seria testar se o numero eh divisivel por 6, uma vez que para um numero ser divisivel por 6, necessariamente ele deve ser divisivel por 2 e 3 concomitantemente } Write(#10#13#10#13, 'Tecle "Enter" para sair.'); Readln; end. |
Outras linguagens? Envie sua sugestão para [email protected] e teremos o maior prazer em publicar.