Вмассиве хранится информация о стоимости каждой из 50 книг. вывести на экран стоимости 10 самых дешевых книг.

243

443

Посмотреть ответы 2

Ответы на вопрос:

Додоша18

Информатика

4,8(5 оценок)

const n=50; vara: array[1..n] of integer; m,i,j: integer; beginrandomize; for i: =1 to n do begin a[i]: =random(3600)+300; write(i,'. ',a[i]); end; for j: =1 to n-1 do begin for i: =1 to n-1 do if a[i]> a[i+1] then begin m: =a[i]; a[i]: =a[i+1]; a[i+1]: =m; end; end; writeln; for i: =1 to 10 do writeln(i,') ',a[i]); end.

то-что курсивом это организация ввода в массив цен. если у вас другой способ то измените. 3600 это max цена, а 300 min можно и тут поменять . как угодно)