Fazer um algoritmo que leia 5 grupos de 4 valores (A,B,C,D) e mostre-os na ordem lida. Em seguida, ordene-os em ordem decrescente e mostre-os novamente, já ordenados (por grupo).
Já fiz uma parte e acho q esta certo o problema, o problema e o final, já vi umas resoluções para este problema, porém, todos usam vetor e matrizes e ainda não aprendi isto na faculdade, portanto gostaria que as respostas fossem com as instruções REPITA OU PARA OU ENQUANTO, segue abaixo a maneiro q fiz o algoritmo:
var
x,a,b,c,d:inteiro
inicio
para x:= 1 ate 5 faca
leia (a,b,c,d)
escreval("Grupo",x,"=",A,B,C,D)
fimpara
para x:=5 ate 1 passo -1 faca
escreval("Grupo",x,"=",A,B,C,D)
fimpara
fimalgoritmo
Grupo 5= 17 18 19 20______
Grupo 5= 17 18 19 20 \
Grupo 4= 17 18 19 20 == ESTE E O ERRO DO MEU CODIGO
Grupo 3= 17 18 19 20 == OS GRUPOS ATE APARECEN EM ORDEM DESCRENTE
Grupo 2= 17 18 19 20 == MAS TODOS SÃO IGUAIS AO GRUPO 5, EU QUERIA
Grupo 1= 17 18 19 20______/ Q OS GRUPOS FICASSEM SALVOS E DEPOIS EU PUDESSE
ESCREVE-LOS NO FINAL EM ORDEM DECRESCENTE
Fim da execução.
POR FAVOR ME A CORRIGIR O ERRO NA SAÍDA DO ALGORITMO