Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Eu tenho que fazer um algoritmo que leia 3 variáveis numéricas e as coloque em ordem crescente com apenas 3 "se"ou "if" nem um "ou" e um "senao". (dica que o prof. deu: nem sempre o "leia" precisa ta na ordem com o "se" pode vir antes ou depois) O problema e que não consigo nem a pau, ainda to no começo do curso de técnico em Informatica o professor passou isso já perguntei até pra pessoas que tem faculdade de ciências da computação e não sabem. Mas meu professor disse que dá e a gente tem que fazer. detalhe precisa ser um visuALG eu até achei aqui mesmo um
program OrdemCrescenteProcedure;
procedure Trocar(var x,y:real);
..var aux:real
..begin aux:=x; x:=y; y:=aux; end;
var
..a,b,c, aux :real; {variaveis do programa}
begin
..{ler os valores}
..writeln('Digite o valor de "a", "b" e "c");
..readln(a,b,c)
..{ordenar valores (crescente de valor)}
..if a>b then Trocar(a,B);
..if b>c then Trocar(b,c);
..if a>b then Trocar(a,B);
..{exibir valores}
..writeln;
..writeln(' Valore em ordem: ',a,', ',b,', ',c);mas nao sei tranferir pro visual g
Carregando comentários...