1. дано натуральное число х. вычислить y = 1 - 2x + 3x2 - 4x3. разрешается использовать не более8 арифметических - id35639420211016 от MMPO 16.10.2021 17:58

Question

Информатика: 1. дано натуральное число х. вычислить y = 1 - 2x + 3x2 - 4x3. разрешается использовать не более8 арифметических операций. допустимы: операции сложение, вычитание, умножение. разработать схему алгоритмадля решения этой . протестировать алгоритм для x=0, x=1, x=-2. 2. дано натуральное число х. вычислить y = x5. разрешается использовать только три операции умножения. разработать схему алгоритма для решения этой . протестировать алгоритм для x=-2 и x=3.

MMPO · Accepted Answer

// PascalABC.NET 3.1, сборка 1171 от 15.02.2016
begin
var i,j:integer;
var n:=ReadInteger('n=');
var a:=ArrRandom(n,10,99); a.Println;
var imax:=0;
var imin:=0;
for i:=1 to n-1 do
    if a[i]>a[imax] then imax:=i
    else
      if a[i]<a[imin] then imin:=i;
if imin<imax then begin
    for i:=imin+1 to imax-1 do
      for j:=imin+1 to imax-1 do
        if a[i]>a[j] then Swap(a[i],a[j])
    end
else
    for i:=imax+1 to imin-1 do
      for j:=imax+1 to imin-1 do
        if a[i]>a[j] then Swap(a[i],a[j]);
a.Println
end.

Тестовое решение:
n= 15
46 87 95 49 86 17 43 61 15 57 23 60 84 75 82
46 87 95 86 61 49 43 17 15 57 23 60 84 75 82

MOGZ ответил