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

Решить данный пример написав программу решения на языке программирования Python. Cрочно !


Решить данный пример написав программу решения на языке программирования Python. Cрочно !

👇
Ответ:
Dasha2006rrtt
Dasha2006rrtt
06.03.2023

from tkinter import *

from math import*

root = Tk()

root.title("Задание 2")

root.geometry("550x250")

def summa():

   n=EntryN.get()

   n=int(n)

   a=EntryA.get()

   a=int(a)

   d=EntryD.get()

   d=int(d)

   m=EntryM.get()

   m=int(m)

   s=0

   for i in range(1,4):

      s+=i + m

   pr=1

   for j in range(1,4):

      pr*=j+d

   res=n*(a/pr+s/m)    

   EntryS.configure(text='y = {}'.format(res))

   #EntryS.delete(0,END)

   #EntryS.insert(0,res)

   

Label(root, width=15, text=" n =",font="Times 14").grid(row=1, column=5, sticky=W)

Label(root, width=15, text=" a =",font="Times 14").grid(row=2, column=5, sticky=W)

Label(root, width=15, text=" d =",font="Times 14").grid(row=3, column=5, sticky=W)

Label(root, width=15, text=" m =",font="Times 14").grid(row=4, column=5, sticky=W)

EntryN = Entry(root, width=15, font="Times 14")

EntryA = Entry(root, width=15, font="Times 14")

EntryD = Entry(root, width=15, font="Times 14")

EntryM = Entry(root, width=15, font="Times 14")

#EntryS = Entry(root, width=25, font="Times 14")

EntryS = Label(root)

EntryS.grid(column=5, row=5)  

EntryN.grid(row=1, column=6, sticky=E)

EntryA.grid(row=2, column=6, sticky=E)

EntryD.grid(row=3, column=6, sticky=E)

EntryM.grid(row=4, column=6, sticky=E)

# файл с формулой, если отличается - укажите свой

img = PhotoImage(file="d:/f1.gif")

label = Label(root, image=img)

label.image_ref = img

label.grid(column=9, row=0)  

but = Button(root, text="Вывести сумму", width=20, font="Times 10", command=summa)

but.grid(row=5, column=9, sticky=E)

root.mainloop()    

4,7(12 оценок)
Открыть все ответы
Ответ:
natalijamatijch
natalijamatijch
06.03.2023
Каждая из компонент связности должна быть кликой (иначе говоря, каждые две вершины в одной компоненте связности должны быть связаны ребром). Если в i-ой компоненте связности n_i вершин, то общее число рёбер будет суммой по всем компонентам связности:

\displaystyle \sum_{i=1}^K\frac{n_i(n_i-1)}2=\frac12\sum_{i=1}^K n_i^2-\frac12\sum_{i=1}^Kn_i=\frac12\sum_{i=1}^K n_i^2-\frac N2

Требуется найти максимум этого выражения (т.е. на самом деле - максимум суммы квадратов) при условии, что сумма всех ni равна N и ni - натуральные числа.

Если K = 1, то всё очевидно - ответ N(N - 1)/2. Пусть K > 1.

Предположим, n1 <= n2 <= ... <= nK - набор чисел, для которых достигается максимум, и n1 > 1. Уменьшим число вершин в первой компоненте связности до 1, а оставшиеся вершины "перекинем" в K-ую компоненту связности. Вычислим, как изменится сумма квадратов:
\Delta(\sum n_i^2)=(1^2+(n_K+n_1-1)^2)-(n_1^2+n_K^2)=2(n_1-1)(n_K-1)
Поскольку по предположению n1 > 1 (тогда и nK > 1), то сумма квадратов увеличится, что противоречит предположению о том, что на выбранном изначально наборе достигается максимум. Значит, максимум достигается, если наименьшая по размеру компонента связности - изолированная вершина. Выкинем эту компоненту связности, останутся K - 1 компонента связности и N - 1 вершина. Будем продолжать так делать, пока не останется одна вершина, тогда получится, что во всех компонентах связности кроме последней должно быть по одной вершине.

Итак, должно выполняться
n_1=n_2=\cdots=n_{K-1}=1;\qquad n_K=N-K+1

Подставив в исходную формулу, получаем
\displaystyle\frac{(N-K)(N-K+1)}{2}

Это и есть ответ.
4,7(55 оценок)
Ответ:
Ytbjfdg
Ytbjfdg
06.03.2023
Var
a:array[1..100,1..100] of integer;
c:array[1..20,1..20] of real;
b:array[1..20,1..20] of real;
i,j,n,k:integer;
t:real;
r:integer;
begin
randomize;
t:=0;
Writeln('Введите порядок матрицы: ');
readln(n);
for i:=1 to n do
for j:=1 to n do
begin
a[i, j] := random(10); 
end;
for i:=1 to n do
for j:=1 to n do
begin
b[i,j]:=1/i+j-1;
end;
for i:=1 to n do
for j:=1 to n do
begin
for k:=1 to n do
begin
t :=t+a[i,k]*b[k, j];
end;
c[i,j]:=t;
t:=0;
end;
for i:=1 to n do
begin
for j:=1 to n do
begin
write(' ',c[i,j]:2:2);
end;
Writeln;
end;

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