Var ar:array[1..10] of integer;
i:integer;
begin;
for i:=1 to 10 do
begin;
write('Введите ',i,' элемент массива:');
readln(ar[i]);
if ar[i]<0 then ar[i]:=abs(ar[i]);
end;
writeln('Final array:');
for i:=1 to 10 do
write(ar[i]:4);
<span>end.</span>
По формулам считаем:
N=2^i
I=k*i
134=2^8
I=308334*8=2466672 бит=308334 байт=301 кбайт
512=2^9 ---> 9 бит для кодировки одного символа
F = 4096*9=1024*4*9 бит =9*2^12 бит =4,5 *2^13 бит =4,5 Кбайт
ответ 4,5 Кбайт
1.Необходимо перевести все числа в десятичную СС:
1)10001001 = 1·27+0·26+0·25+0·24+1·23+0·22+0·21+1·1 = 137.
2) 214 = 2·82+1·81+4·1 = 140.
3) D7 = 13·161+7·1 = 215.
4) 1111000= 1·26+1·25+1·24+1·23+0·22+0·21+0·1 = 120.
145<215<469.
Ответ: 3
2.
1)29+209=238.
2)238/16 = 14, остаток: 14, 14 = E
14/16 = 0, остаток: 14, 14 = E
238(в десятичной) = EE(в шестнадцатиричной).
Ответ: 3!
У тебя ошибка во втором.
Программа получает со ввода значение H и выполняет табуляцию функции F(t,H)=11(t-H)²+13 на интервале [0;30]. На вывод поступает значение t, при котором функция F(t,H) принимает максимальное значение.
В задании требуется определить максимальную величину H, при которой функция F(t,H) на заданном интервале принимает максимальное значение для t=30, т.е. на правом конце интервала.
График функции F(t,H) - это квадратная парабола, ветви которой направлены вверх, поэтому максимальное значение такой функции достигается на одном или одновременно на обоих концах интервала. Для нашего случая
F(30,H) > F(0,H)
11(30-H)²+13 > 11(0-H)²+13
11(900-60H+H²)+13 > 11H²+13
9900-660H+11H²+13 > 11H²+13
9900-660H > 0 ⇒ H < 9900/660 или H<15.
В целых числах получаем H=14 (в программе H описывается как integer).
<u><em>Ответ:</em></u> H=14
