programação

1) Faça um algoritmo que solicite ao usuário dois números e exiba o resultado da soma dos números lidos.

program exercicio1; uses crt; var num1,num2,soma:integer; begin write('Digite qualquer numero: '); readln(num1); write('Digite outro numero qualquer: '); readln(num2); soma:=num1+num2; write('os numeros somados ficam ',soma); readkey; end.

2) Faça um algoritmo que solicite ao usuário dois números e ao final mostre a soma, subtração, multiplicação e a divisão dos números lidos.

program exercicio2; uses crt; var num1,num2,soma,subtracao,multiplicacao,divisao:integer; begin writeln('Digite qualquer numero: '); readln(num1); writeln('Digite outro numero qualquer: '); readln(num2); soma:=num1+num2; writeln('Os numeros somados ficam ',soma); subtracao:=num1-num2; writeln('Os numeros subtraidos ficam ',subtracao); multiplicacao:=num1*num2; writeln('Os numeros multiplcados ficam ',multiplicacao); divisao:=num1 div num2; writeln('Os numeros divididos ficam ',divisao); readkey; end.

3) Faça um algoritmo que solicite ao usuário um número qualquer e exiba o seu dobro.

program exercicio3; uses crt; var num1,resultado:integer; begin writeln('Digite um numero: '); readln(num1); resultado:=num1+num1; writeln('O dobro do numero e: ',resultado); readkey; end.

4) Escrever um algoritmo para determinar o consumo médio de um automóvel sendo fornecidos a distância total percorrida pelo automóvel e o total de combustível gasto.

program exercicio4; uses crt; var km,gasolina,resultado:integer; begin writeln('Digite a distancia percorrida: '); readln(km); writeln('Digite o total de combustivel gasto: '); readln(gasolina); resultado:=km div gasolina; writeln('o seu carro consome: ',resultado,'KM por litro'); readkey; end.

5) Escrever um algoritmo que leia o nome de um vendedor, o seu salário fixo e o total de vendas efetuadas por ele no mês (em dinheiro). Sabendo que este