Страница 54-55 параграф 1.4 вопрос 12, ГДЗ по информатике за 9 класс к учебнику Босовой за 2023 год Просвещение

При сортировке по плотности обмен содержания ячеек идет и в массиве имен.program Z_1_4_12;const N = 10;var name: array [1..N] of string = ('Китай', 'Индия', 'Россия', 'Бразилия', 'Индонезия', 'Нигерия', 'Пакистан', 'США', 'Мексика', 'Бангладеш'); k: array [1..N] of longint = (1411750000, 1414843757, 146424729, 215000000, 277329163, 214568727, 222903998, 301693000, 129150971, 165775000); s: array[1..N] of longint = (9598960, 3287590, 17075000, 8511970, 1919440, 1267000, 803940, 9363000, 1972550, 130170); // площадь plt: array[1..N] of real; // плотность начеления i, j: integer; c: real; st: string;begin for i := 1 to 10 do plt[i] := k[i] / s[i];//формирование массива плотности населения for i := 1 to 10 do //сортировка по плотности for j := i + 1 to 10 do if plt[i] > plt[j] then begin c := plt[j]; plt[j] := plt[i]; plt[i] := c; st := name[j]; name[j] := name[i]; name[i] := st; end; for i := 1 to 10 do writeln(name[i]:10, ' ', plt[i]:15:2);end.Окно вывода: Россия 8.58 Бразилия 25.26 США 32.22 Мексика 65.47 Индонезия 144.48 Китай 147.07 Нигерия 169.35 Пакистан 277.26 Индия 430.36 Бангладеш 1273.53