Segundo a Wikipedia um múltiplo é o produto de qualquer quantidade e um inteiro. Em outras palavras, para as quantidades a e b, dizemos que b é um múltiplo de a caso b = na para alguns n inteiro, isto será chamado de multiplicador ou coeficiente . Se a não é zero, isso equivale a dizer que b/a é um número inteiro, sem resto. Se a e b são ambos inteiros e b é um múltiplo de a, então a é chamado de divisor de b. O produto de dois inteiros é chamado às vezes de múltiplo inteiro.
Sugestão de resposta em linguagem algorítmica
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | programa Exercicio23; uses Classes, SysUtils; var A, B: Inteiro; inicio Escreva('Informe o primeiro numero: '); Leia(A); Escreva('Informe o segundo numero: '); Leia(B); se (A mod B = 0) then Escreva('O numero ', A, ' eh multiplo de ', B, '.') senao Escreva('O numero ', A, ' NAO eh multiplo de ', B, '.') ; fim. |
Sugestão de resposta 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 28 29 30 31 | program Exercicio23; {$mode objfpc}{$H+} uses Classes, SysUtils; var A, B: Integer; begin try Write('Informe o primeiro numero: '); Readln(A); Write('Informe o segundo numero: '); Readln(B); if (A mod B = 0) then Write('O numero ', A, ' eh multiplo de ', B, '.') else Write('O numero ', A, ' NAO eh multiplo de ', B, '.') ; Write(#10#13#10#13, 'Tecle "Enter" para sair.'); Readln; except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; end. |
Outras linguagens?
Envie também a sua sugestão de algoritmo para showdelphi@showdelphi.com.br.
Está gostando do conteúdo? Considere pagar um cafezinho para nossa equipe!
