Genilson20

@Leandro ads o pior que essa questão tambem caiu para mim , eu não conseguir responder vou perder esse ponto @Leandro ads em qual escola voce estuda ?

@Leandro ads conseguiu responder?

Algoritmo "semnome" Var i, numeLeve, numPesado: inteiro peso, boiPesado, boiLeve: real Inicio escreva("boi N 1") leia (boi N 1) leia (peso): boipesado := peso: boiLeve := peso: se peso > boipesado leia boipesado := peso: numpesado := i: enatao se peso < boileve leia boileve := i: fimse fimse fimse escreva ("o boi mais pesado e o de numero ', numpesado, ' e pesa ', boipesado:4:2): escreva(" o boi mas leve e o de numero ', numleve, ' e pesa ', boileve:4:2): Fimalgoritmo eu postei este codigo no visualg e não execultou disse que a sintase esta incorreto , alguém sabe porque ? e se souberem , eu queria saber como faço para encontrar uma quantidade de boi indefinida dentro desse algoritmo .por que ate então eu estou no rumo so do boi mas leve e do mas pesado e o seu codigo , mas não tem problema porque na questão eu so troco as informações de codigo pelas informações de raça , como esta pedindo no questionario acima , algora eu to perdido e como eu faria para encontrar a quantidade de boi indefinida @devair1010 @Ricardov

@devair1010 na língua do visualg

João cria bovinos de duas raças (1 e 2) em sua fazenda. Devido a uma necessidade gerencial, ele deseja um algoritmo para calcular a quantidade de bois de cada raça; a média de peso de cada raça; o boi mais pesado e a sua raça; e, o boi mais leve e a sua raça. Para o funcionamento do algoritmo serão informados os seguintes dados, pelo gerente da fazenda: Primeiramente, e somente uma vez, a quantidade total de bois; A raça (1 ou 2) e o peso de cada boi. Var i, numLeve, numPesado: integer; peso, boiPesado, boiLeve: real; Begin writeln('BOI N° 1'); write('Digite o peso do boi: '); read(peso); boiPesado := peso; boiLeve := peso; for i:=2 to 90 do begin writeln('BOI N° ', i); write('Digite o peso do boi: '); readln(peso); if peso > boiPesado then begin boiPesado := peso; numPesado := i; end else if peso < boiLeve then begin boiLeve := peso; numLeve := i; end; end; writeln('O boi mais pesado é o de número ', numPesado, ' e pesa ', boiPesado:4:2); writeln('O boi mais leve é o de número ', numLeve, ' e pesa ', boiLeve:4:2);