5484518648

805 palavras 4 páginas
Caro cursista, Com base nos conhecimentos produzidos até aqui em seus estudos, responda as questões propostas abaixo. Lembre-se que você possui um fórum para tirar suas dúvidas com relação a esta tarefa.
1) Escreva um algoritmo que armazene o valor 10 em uma variável A e o valor 20 em uma variável B. A seguir (utilizando apenas atribuições entre variáveis) troque os seus conteúdos fazendo com que o valor que está em A passe para B e vice-versa. Ao final, escrever os valores que ficaram armazenados nas variáveis.
2) Escreva um algoritmo para ler as dimensões de um retângulo (base e altura), calcular e escrever a área do retângulo.
3) Faça um algoritmo que leia a idade de uma pessoa expressa em anos, meses e dias e escreva a idade dessa pessoa expressa apenas em dias. Considerar ano com 365 dias e mês com 30 dias. var idade_anos,idade_meses,idade_dias, resultado : inteiro; inicio escreval("Quanto anos você tem ?"); ler(idade_anos); escreval("E quanto meses ?"); ler(idade_meses); escreval("E quantos dias ?"); ler(idade_dias); resultado <- (idade_anos * 365) + (idade_meses * 30) + idade_dias; escreva("Sua idade em dias é "+resultado);

4) Escreva um algoritmo para ler o número total de eleitores de um município, o número de votos brancos, nulos e válidos. Calcular e escrever o percentual que cada um representa em relação ao total de eleitores.

program semnome; uses Crt;
{ Função :}
{ Autor :}
{ Data : 24/03/2013}
{ Seção de Declarações} var eleitorestotal,votosbrancos,nulos, validos,porbra,pornulos,porvalidos : real; begin writeln('Digite o numero total de votos'); readln(eleitorestotal); writeln('Digite o numero total de votos brancos'); readln(votosbrancos); writeln('Digite o numero total de votos nulos'); readln(nulos); writeln('Digite o numero total de votos validos'); readln(validos); if (votosbrancos<>0) then begin porbra:=(votosbrancos*100)/eleitorestota… end else begin porbra:=0; end;

Relacionados