1) Sort(arrau moditifed in place) program myprog(input, output); type dataset = array[1..3] of integer; var mydata: dataset; i:
1) Sort(arrau moditifed in place) program myprog(input, output); type dataset = array[1..3] of integer; var mydata: dataset; i: integer; procedure sortArray(var srcdata: dataset); var i, j: integer; temp: integer; begin for i := 1 to 2 do for j := 1 to 3 – i do if srcdata[j] > srcdata[j + 1] then begin temp […]
