Segue abaixo um exemplo de código em Lazarus que atende aos requisitos da questão: ``` program VerificaNumero; {$APPTYPE CONSOLE} uses SysUtils; function VerificaIntervalo(NUM: Integer): String; begin if (NUM >= 10) and (NUM <= 150) then Result := 'No intervalo' else Result := 'Fora do intervalo'; end; var Numero: Integer; begin Write('Digite um número inteiro: '); Readln(Numero); Writeln(VerificaIntervalo(Numero)); end. ``` O programa lê um número inteiro digitado pelo usuário e chama a função `VerificaIntervalo` para verificar se o número está dentro do intervalo especificado. A função retorna a mensagem "No intervalo" se o número estiver dentro do intervalo e "Fora do intervalo" caso contrário. O resultado é exibido na tela.
Para escrever sua resposta aqui, entre ou crie uma conta
Compartilhar