Faça um programa para ler as seguintes informações de uma pessoa: Nome, Idade, Sexo, Peso, Altura, Profissão, Rua, Bairro, Cidade, Estado, CEP, Telefone.
Faça um programa para identificar o maior entre três números digitados.
Faça um programa que leia os coeficientes de uma equação do segundo grau e calcule suas raízes. O programa deve mostrar, quando possível o valor das raízes calculadas, o valor do delta e a classificação das raízes (“RAÍZES IMAGINÁRIAS”, “RAIZ ÚNICA”, RAÍZES DISTINTAS”).
Faça um programa para ler a base e a altura de um triângulo. Em seguida, escreva a área do mesmo.
Obs.: Área = ( Base * Altura ) / 2
O preço de um automóvel é calculado pela soma do preço de fabrica com o preço dos impostos (45% do preço de fabrica) e a percentagem do revendedor (28% do preço). Faça um programa em pascal que leia o nome do automóvel e o preço de fabrica e mostre na tela o nome do automóvel e o preço final.
Obs: Imposto=Preço de Fábrica X (0,45 + 0,28) Preço final= Preço de fábrica + imposto
O departamento de trânsito do estado anotou dados de acidentes de transito no ultimo ano. Para cada motorista envolvido no acidente, tem-se a seguinte informação:
Quantas mulheres são da capital e quantas são do interior;
Calcule quantos motoristas do interior do estado tem idade maior que 60 anos;
Diga quantas mulheres de outro estado tem idade maior que 60 anos.
7. Num frigorífico existem 90 bois. Cada boi traz preso no seu pescoço um cartão contendo um número de identificação e seu peso. Implementar um algoritmo que escreva o número e o peso do boi mais gordo e do boi mais magro (não é necessário armazenar os dados de todos os bois).
3 comentários em “Algoritmos – Aula4 -Exercícios Básicos”
Mestre, muito bom seu site, os exercícios de algoritimo ainda estou penando um pouco, mas as dúvidas pergunto em sala de aula, ou qualquer coisa deixo um recado aqui pro senhor
writeln(‘o boi mais pesado e: ‘,mp:2:2,’ seu codigo e:’,cmp);
writeln(‘o boi mais leve e: ‘,ml:2:2,’ seu codigo e:’,cml);
writeln(‘ja foram armazenados ‘,cont,’ bois’);
Mestre, muito bom seu site, os exercícios de algoritimo ainda estou penando um pouco, mas as dúvidas pergunto em sala de aula, ou qualquer coisa deixo um recado aqui pro senhor
program pesoboi;
uses crt;
var
peso:real;
codigo, cont:integer;
mp,ml:real;
cmp,cml:integer;
continua:string[1];
begin
clrscr;
cont:=0;
continua:=’s’;
while(continua=’s’)do
begin
clrscr;
cont:=cont+1;
write(‘entre com o codigo do boi:’);
readln(codigo);
writeln(‘entre com o peso do boi:’);
readln(peso);
if(cont=1)then
begin
mp:=peso;
ml:=peso;
cmp:=codigo;
cml:=codigo;
end;
if(peso>mp)then
begin
mp:=peso;
cmp:=codigo;
end;
if(peso<ml)then
begin
ml:=peso;
cml:=codigo;
end;
writeln(‘deseja continuar s/n:’);
readln(continua);
end;
writeln(‘o boi mais pesado e: ‘,mp:2:2,’ seu codigo e:’,cmp);
writeln(‘o boi mais leve e: ‘,ml:2:2,’ seu codigo e:’,cml);
writeln(‘ja foram armazenados ‘,cont,’ bois’);
writeln(‘fim do programa’);
readkey;
end.