СРЗНАЧ (среднее значение) - возвращает среднее арифметическое своих аргументов, которые могут быть числами, именами, массивами или ссылками на ячейки с числами.
Перевод из двоичной системы счисления в десятичную Задание: Перевести число 11011012 в десятичную систему счисления.
Для перевода записываем данное число в общем виде: 1·2^6+1·2^5+0·2^4+1·2^3+1·2^2+0·2^1+1·2^0= =1·64+1·32+0·16+1·8+1·4+1·0+1·1=10910
ответ: 11011012=10910
Перевод из восьмеричной системы счисления в десятичную Задание: Перевести число 1738 в десятичную систему счисления.
Для перевода записываем данное число в общем виде: 1·8^2+7·8^1+3·8^0=1·64+7·8+3·1=12310
ответ: 1738=12310
Перевод из шестнадцатиричной системы счисления в десятичную Задание: Перевести число 2А3С16 в десятичную систему счисления.
Для перевода записываем число в общем виде (обратим внимание на то, что букве А соответствует значение 10, а букве С - 12): 2·16^3+10·16^2+3·16^1+12·16^0=2·4096+10·256+3·16+12·1=1081210
Program N70231806_1; var a:array[ 1 .. 10 ] of shortint; i:byte; t:shortint; begin randomize; writeln('Исходный массив: '); for i := 1 to 10 do begin a[ i ] := random(21) - 10; write(a[ i ]:4) end; writeln; t := a[ 10 ]; for i := 10 downto 2 do a[ i ] := a[ i - 1 ]; a[ 1 ] := t; writeln('Результат: '); for i := 1 to 10 do write(a[ i ]:4); readln end.
2) program N70231806_2; var a:array[ 1 .. 12 ] of shortint; i, j:byte; t:shortint; begin randomize; writeln('Исходный массив: '); for i := 1 to 12 do begin a[ i ] := random(25) - 10; write(a[ i ]:4) end; writeln; for j := 1 to 4 do begin t := a[ 12 ]; for i := 12 downto 2 do a[ i ] := a[ i - 1 ]; a[ 1 ] := t end; writeln('Результат: '); for i := 1 to 12 do write(a[ i ]:4); readln end.
СРЗНАЧ (среднее значение) - возвращает среднее арифметическое своих аргументов, которые могут быть числами, именами, массивами или ссылками на ячейки с числами.