0E2F1C0E2F1A0E2E2F0E2E2E0E2E2A0E2E2E0E2E220E2F1B0E2E1E0E2F1A0E2F2C140E2E
2A0E2E2B0E2E2E0E2F1C0E2E2D0E2F2B140E2F2F140E2E2F0E2F190E2E210E2F210E2E2B0
E2E19140E2F1B0E2E190E2E2D0E2F1F0E2E1E0E2E1B0E2E190E2F1B0E2F2C
нужно расшифровать
129
488
Ответы на вопрос:
Const n = 20; var i, imax, j, x: integer; a: array[1..n]of integer; begin for i : = 1 to n do a[i] : = random(100); for i : = 1 to n - 1 do begin imax : = i; for j : = i + 1 to n do if a[j] > a[imax] then imax : = j; x : = a[i]; a[i] : = a[imax]; a[imax] : = x; end; for i : = 1 to n do write(a[i],' '); writeln(); writeln(imax); end.
Популярно: Информатика
-
HeZnAiKaxXx30.12.2022 22:57
-
dieric16.09.2021 23:39
-
Gootya115.08.2021 06:03
-
Айсулу200228.05.2023 01:41
-
AnnGo990924.05.2021 18:59
-
ЖибекСуонн304.05.2020 11:17
-
elyaminaewap06uze01.01.2023 04:12
-
Аида161117.04.2022 14:34
-
trushinaveronic26.12.2021 01:39
-
NoraDun15.03.2020 20:41