lsuvorova1987
?>

В массиве х замените элементы таким образом, чтобы элементы с четными индексами встали на место нечетных и наоборот, и занесите их в массив у. import array as arr x = arr.array('i') print("x:", end="") n = 10 x = input() [:n] y = x for i in range(10): if i % 2 ==0: c= x[i] x[i]=x[i+1] x[i+1]=c y[i] = x[i] print("y: ", end="") for i in range(len(y)): print(y[i], end="")

Информатика

Ответы

office3
Пусть a,b,c - стороны треугольника (и их длины). Условие существование треугольника:
\left\{\begin{matrix}a
Пусть а - наибольшая из сторон, тогда против нее будет лежать наибольший угол, который можно определить по теореме косинусов:
a^2=b^2+c^2-2bc\cdot cos(A) \to \displaystyle cos(A)= \frac{c^2+b^2-a^2}{2bc}

Текст программы приводится ниже.
var
  a,b,c,t,cosA:real;
begin
  Write('Введите длины сторон треугольника: '); Readln(a,b,c);
  if (a<b+c) and (b<a+c) and (c<a+b) then
  begin
    if a>b then
    begin
        if a<c then begin t:=a; a:=c; c:=t end
    end
    else
      if b>c then begin t:=a; a:=b; b:=t end
      else begin t:=a; a:=c; c:=t end;
    cosA:=(sqr(c)+sqr(b)-sqr(a))/(2*b*c);
    if cosA=0 then Writeln('Треугольник прямоугольный')
    else
      if cosA<0 then Writeln('Треугольник тупоугольный')
      else Writeln('Треугольник остроугольный')
  end
  else
    Writeln('Треугольник построить нельзя')
end.

Тестовое решение:
Введите длины сторон треугольника: 4 6.1 3.7
Треугольник тупоугольный

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

В массиве х замените элементы таким образом, чтобы элементы с четными индексами встали на место нечетных и наоборот, и занесите их в массив у. import array as arr x = arr.array('i') print("x:", end="") n = 10 x = input() [:n] y = x for i in range(10): if i % 2 ==0: c= x[i] x[i]=x[i+1] x[i+1]=c y[i] = x[i] print("y: ", end="") for i in range(len(y)): print(y[i], end="")
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Verdievruslan
morozovalexander90
ilukianienko458
MArat
grigoriev8
klimenko05
петрАфанасьев
РубенШафетдинов
cheshirsky-kot
Nadezhda Malakhov53
nmakarchuk
o-lala88387
nkaminskaja
Оксана
Акимцева27