Лат. carne vale, «прощай, мясо» либо лат. car val — «корабль шутов»
Var a:array [1..1000] of integer;
k,i,n:integer;
begin
write ('kol-vo elementov v massive=');
readln (n);
write ('k=');readln (k);
writeln ('vvedite massiv');
for i:=1 to n do
readln (a[i]);
write ('massiv: ');
for i:=1 to n do
write (a[i],' ');
if (k<=n) and (k>0) then
for i:=k+1 to n do
a[i-1]:=a[i];
writeln;
write ('massiv posle ydalenija: ');
for i:=1 to n-1 do
write (a[i],' ');
end.
120ₓ = 63₁₀
1 · x² + 2 · x¹ + 0 · x⁰ = 63
x² + 2x - 63 = 0;
D = 4 + 252 = 16²
x₁₂ = (-2 ± 16) / 2 = -9, 7
Отрицательная система счисления нам не подходит, поэтому ответом является 7.
Вообще более менее очевидно что нужно поменять максимальное число с минусом и минимальное число с плюсом
это -99 и 2
Посчитаем исходную сумму. Если суммировать попарно (-1+2)+(-3+4)+... = 1+1... = 100/2 = 50
Посчитаем новую сумму с заменой
50- (-99 + 2) + (99 - 2) = 244