Паскаль, ! 1. задать случайным образом 13 элементов числового массива – числа от 10 до 50. удалить из него: а) 10-ый элемент; б) минимальный элемент. 2. из символьного массива, 7
элементов которого заданы с клавиатуры, удалить максимальный элемент.

I,k: integer; begin randomize; writeln('массив: '); for i: =1 to 13 do begin a[i]: =random(41)+10; write(a[i],' '); end; writeln; writeln('массив после удаления 10-го элемента: '); for i: =10 to 12 do a[i]: =a[i+1]; for i: =1 to 12 do write(a[i],' '); writeln; writeln('массив после удаления минимального элемента: '); k: =1; for i: =1 to 12 do if a[i]< a[k] then k: =i; for i: =k to 11 do a[i]: =a[i+1]; for i: =1 to 11 do write(a[i],' '); writeln; end. var a: array [1..7] of char; i,k: integer; begin writeln('введите массив: '); for i: =1 to 7 do readln(a[i]); writeln('массив'); for i: =1 to 7 do write(a[i],' '); writeln; writeln('массив после удаления максимального элемента: '); k: =1; for i: =1 to 7 do if a[i]> a[k] then k: =i; for i: =k to 6 do a[i]: =a[i+1]; for i: =1 to 11 do write(a[i],' '); writeln; end.

1, 1, 1, 2, 1
Изменение значения: 11, 9, 7, 5, 15, 13.

Если разделить 1 стержень на 5 частей то кол-во распилов будет равно 4,
всего добавилось 33 стержня, 33 - 9 = 24
Значит: 24 / 4 = 6
Ответ: 6 .

I = 3кб, К = 3072 символа, N — ?I= 3 Кб = 3 • 1024 • 8 = 24576 бит I = I/K = 24576/3072 = 8 бита N=2^8 = 256 символов