Я проктически все сделала но пустое место не понимаю что там писать Информатика 4 класс Горячев страница 32 упражнение 3 (В Г. Д. З СМОТРЕЛА НЕТУ)

240

389

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

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

staskostenko1

Информатика

4,6(80 оценок)

Const k = 13; var a: array[1..k] of integer; i,j: integer; begin {заполнение массива} write('исходный массив: '); for i: = 1 to k do begin a[i]: =random(21)-10; write(a[i],' ') end; writeln; {сортировка пузырьком} for i: = 1 to k do for j: = 1 to k-1 do if a[j]> a[j+1] then swap(a[j],a[j+1]); {вывод массива} write('отсортированный массив: '); for i: = 1 to k do write(a[i],' ') end.