Составьте программу,которая заполняет массив a[1..10] случайными числами в диапазоне от 0 до 10,затем первый элемент меняет местами с максимальным элементом.выведите на экран исходный и полученный массивы.
110
172
Ответы на вопрос:
Program asd; var a,b,c,i: integer; ar: array[1..11] of integer; begin for i: =1 to 10 do begin a: =random(10); ar[i]: =a; end; for i: =1 to 10 do write(ar[i],' '); b: =ar[1]; for i : = 2 to 10 do if ar[i] > b then begin b: =ar[i]; c: =i; end; ar[c]: =ar[1]; ar[1]: =b; writeln(); for i: =1 to 10 do write(ar[i],' '); end.
N=2^i n=4 (количество цветов),а i=2 бит,т.к. корень из 4 = 2 ответ: 2 бита
Популярно: Информатика
-
Ailina2425.03.2021 15:21
-
Марс201405.03.2022 07:45
-
elnareismayilo30.05.2023 15:34
-
ПоНчИкНям23.09.2022 11:32
-
slavaglybochka17.05.2021 03:50
-
валерияС121.08.2021 12:31
-
Евгеша20011119.10.2021 02:03
-
komissarova531003.09.2020 16:02
-
mrdaaly06.06.2023 06:08
-
lezifequliyeva01.07.2022 13:12