LukasM
-
Pranešimai
13 -
Užsiregistravo
-
Lankėsi
-
Atsiliepimai
50%
Reputacijos išklotinė
-
LukasM sureagavo į Valdas3 Pascalio programa
Kai norime visas to pačio record tipo reikšmės perduoti iš vieno kintamojo į kitą galime tai padaryti vienu sakiniu.
procedure rikiuot; var temp:group; begin for i:=1 to k-1 do for j:=i+1 to k do if G[i].sk < G[j].sk then begin temp:=G[i]; G[i]:=G[j]; G[j]:=temp; end; end;