М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Vzorr
Vzorr
28.12.2022 12:31 •  Информатика

Выполните арифметические операции над числами 0,101 * 2^3 и 0,1 * 2^5

👇
Ответ:
kennis1269
kennis1269
28.12.2022
0,101*2^3 = 0.101*8=0.808
0.1*2^5=0.1*32=3.2
4,4(84 оценок)
Открыть все ответы
Ответ:
maririz405
maririz405
28.12.2022
//Когда Глеб расстроился
//Pascal ABC.NET 3.1 сборка 1256

Var
 a,b,c,d,e:real;
 
procedure cube(a,b,c,d,e:real);
Var
 p,q,delta,phi,i:real;
 y:array[1..3] of real;
begin
p:=(3*a*c-sqr(b))/(3*sqr(a));
q:=(2*power(b,3)-9*a*b*c+27*sqr(a)*d)/(27*power(a,3));
delta:=power(q/2,2)+power(p/3,3);
if delta<0 then
 begin
  if q<0 then
   phi:=arctan(sqrt(-delta)/(-q/2));
  if q>0 then
   phi:=arctan(sqrt(-delta)/(-q/2))+pi;
  if q=0 then
   phi:=pi/2;
  y[1]:=2*sqrt(-p/3)*cos(phi/3);
  y[2]:=2*sqrt(-p/3)*cos(phi/3+(2*pi)/3);
  y[3]:=2*sqrt(-p/3)*cos(phi/3+(4*pi)/3);
  var x:=seq(y[1]-b/(3*a),y[2]-b/(3*a),y[3]-b/(3*a));
  write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
 end;
if delta>0 then
 begin
  var arsom:=range(0,1000).Where(x->(a*power(x,3)+b*x*x+c*x+d)/(x-e)=0);
  write(arsom.Count);
  {Мы не виноваты, Паскаль не может в комплексные числа}
 end;
if delta=0 then
 begin
  y[1]:=2*power(-q/2,1/3);
  y[2]:=-power(-q/2,1/3);
  var x:=seq(y[1]-b/(3*a),y[2]-b/(3*a));
  write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
 end;
end;

procedure square(a,b,c,e:real);
Var
 d:real;
begin
d:=sqr(b)-4*a*c;
if d<0 then writeln('0');
if d>0 then
 begin
  var x:=arr((-b+sqrt(d))/(2*a),(-b-sqrt(d))/(2*a));
  write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
 end;
if d=0 then
 begin
  var x:=arr(-b/(2*a));
  write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
 end;
end;

procedure common(a,b,e:real);
begin
 var x:=arr(-b/a);
 write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
end;

procedure awfulvar(e:real);
begin
 if (e>=0) and (e<=1000) then writeln('1000') else writeln('1001');
end;

procedure otherawfulvar(e:real);
begin
 if e<>0 then writeln('1') else writeln('0');
end;

begin
read(a,b,c,d,e);
if (a<>0) and (b<>0) then cube(a,b,c,d,e);
if (a=0) and (b<>0) then square(b,c,d,e);
if (a=0) and (b=0) and (c<>0) and (d<>0) then common(c,d,e);
if (a=0) and (b=0) and (c=0) and (d=0) then awfulvar(e);
if (a=0) and (b=0) and (c<>0) and (d=0) then otherawfulvar(e);
if (a=0) and (b=0) and (c=0) and (d<>0) then writeln('0');
end.

Пример ввода:
1
1
1
1
1
Пример вывода:
0
4,7(4 оценок)
Ответ:
mishkasega77798
mishkasega77798
28.12.2022

ответ: Попробуй это, надеюсь, правильно понял задание:

def task():

   numbers = input("Введите массив чисел через пробел: ")

   array = list(numbers.split())

   negativelist = []

   loopint = 0

   for i in range(0, len(array)):

       array[i] = int(array[i])

   while loopint < len(array):

       if array[loopint] < 0:

           negativelist.append(array[loopint])

       else:

           pass

       loopint = loopint + 1

       

   negativelist.sort()

   final_list = negativelist + array

   result = []

   for i in final_list:

       if i not in result:

           result.append(i)

   print(result)

Объяснение:

1)Объявляем функцию task() без параметров;

2)Ждем ввода чисел с Превращаем введенные числа в массив с предварительно разбив их по пробелам с Так как нужно отсортировать только негативные элементы, нам нужен будет отдельный массив негативных чисел, создаем пустой лист negativelist и переменную для loop'a loopint;

5)Превращаем все введенные элементы в числа с и функции int();

6)Производим итерацию через массив чисел и, если число меньше 0, добавляем его в лист отрицательных чисел negativelist с функции append(), если же число не отрицательное, то ничего не делаем (pass). Не забываем про луп-переменную.

7)Теперь когда у нас есть отдельный список отрицательных чисел, сортируем его с Объявляем новый список, где отрицательный массив добавляется к введенному пользователем массиву так, чтобы отрицательные числа были слева. Теперь у нас есть отсортированные отрицательные числа слева, но они также остались и на своих первоначальных местах изначально введенного массива, нужно избавиться от них;

9)Сравниваем два массива и, если нет дупликатов, добавляем их в конечный массив result, при этом не трогая неотрицательные числа.

Важно: эта программа будет работать правильно, если все введенные числа будут уникальны, то есть не будут повторяться. Если в массиве будут повторяющиеся числа, то в конечном результате появится только одно такое число. Дальше уж сам поколдуй как-нибудь.

4,8(11 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ