Buscar

Prova 3 - Algoritmo e Lógica de Programação - Discursiva

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você também pode ser Premium ajudando estudantes

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você também pode ser Premium ajudando estudantes

Prévia do material em texto

Disciplina:
	Algoritmo e Lógica de Programação (EEA02)
	Avaliação:
	Avaliação Final (Discursiva) - Individual Semipresencial ( Cod.:656378) ( peso.:4,00)
	Prova:
	25205734
	1.
	Os operadores lógicos trabalham com valores booleanos, com o objetivo de avaliar expressões cujo valor pode ser verdadeiro ou falso, ou seja, implementando a lógica booleana. Eles são usados para representar situações lógicas que não podem ser representadas por operadores aritméticos. Baseado nisso, analise a tabela verdade, preencha corretamente a coluna resultado (a OU b) e justifique. ( * Máximo 4000 caracteres )
	
a | b | a OU b
F | F | Falso
F | V | Verdadeiro
V | F | Verdadeiro
V | V | Verdadeiro
 
O operador OU retorna Verdadeiro quando uma das duas sentenças é Verdadeira, desta forma a linha 2 (B = V), linha 3 (A = V) e linha 4 (A = V, B = V) retornarão Verdadeiro, ou seja, apenas a linha 1 (A = F, B = F) retornará Falso neste caso.
	2.
	Fazendo uso da linguagem Pascal, desenvolva um programa com o nome "tabuada". Para auxiliar os alunos no ensino da matemática, foi solicitada a criação de um programa em Pascal para a geração da tabuada (de 1 até 10) para um valor informado. Para encerrar a execução, deve-se informar o valor zero (0). Com base no exposto, desenvolva o algoritmo solicitado. ( * Máximo 4000 caracteres )
Program tabuada ;
// Desenvolvido por Dionei Preilipper
// Software: Pascalzim versão 6.0.3.1
Var a : integer;
Var num : integer;
Var resultado : integer;
Begin
 write ('Digite um Número: ');
 readln (num);
 
 if (num <> 0) then
 begin
 for a := 1 to 10 do
 begin
 resultado := num*a;
 writeln (num, ' x ', a, ' = ', resultado)
 end;
 end
 else
 begin
 writeln('Você digitou 0.');
 end; 
End.

Outros materiais