ALGORITMOS E LÓGICA DE PROGRAMAÇÃO Exercícios
Exercícios
01 - Construa o algoritmo que receba um número, calcule o seu quíntuplo e mostre o número recebido e o resultado.
program EXE1; uses crt; var num1,quin:real; begin write('Digite um numero:'); readln(num1); quin:=num1*5; writeln('O numero digitado e:',num1:0:2,' e seu quintuplo e:',quin:0:2); readkey; end. 02 - Construa o algoritmo que receba um número, calcule a sua metade, mostre o resultado.
program EXE2; uses crt; var num1,metade:real; begin write('Digite um numero:'); readln(num1); metade:=num1/2; writeln('A metade do numero digitado e:',metade:0:2); readkey; end. 03 – Construa o algoritmo que receba dois números, calcule o produto entre eles, mostre o resultado e os números recebidos. program EXE3; uses crt; var num1,num2,produto:real; begin write('Digite um numero:'); readln(num1); write('Digite um numero:'); readln(num2); produto:=num1*num2; writeln('O produto dos dois numeros digitados e:',produto:0:2); readkey; end. 04 - Construa o algoritmo que receba três números, calcule a diferença do primeiro pelo segundo, o resultado deve ser multiplicado pelo terceiro número e mostre os resultados obtidos. program EXE4; uses crt; var num1,num2,num3,subt,result:real; begin write('Digite o primeiro numero:'); readln(num1); write('Digite o segundo numero:'); readln(num2); write('Digite o terceiro numero:'); readln(num3); subt:=num1-num2; result:=subt*num3; writeln('A diferenca do primeiro pelo segundo e: ',subt:0:2,' e o resultado multiplicado pelo terceiro e: ',result:0:2); readkey; end.
05 – Construa o algoritmo que receba dois números, calcule: a divisão, a multiplicação, a soma, a diferença entre eles e mostre os resultados. program EXE5; uses crt; var num1,num2,divi,mult,soma,subt:real; begin write('Digite o primeiro numero:'); readln(num1); write('Digite o segundo numero:');