В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
shalaeva03
shalaeva03
12.07.2022 08:59 •  Информатика

1. Получить численное решение уравнения Мальтуса с шагом 0.1 мс методом Эйлера. Вывести табличные значения, построить график изменения численности популяции во времени. Сравнить полученные результаты с аналитическим (точным) решением. 2. То же самое с шагом t ≤0.001 мс.

3. Построить графики численного решения уравнения Мальтуса с шагом t≤0.001 мс при различных значениях постоянной r; начального условия x0. Охарактеризовать полученные виды решения. Объяснить биологический смысл параметра r.
СДЕЛАТЬ В Python
уже 2 день с этим вожусь так что могу даже заплатить

Показать ответ
Ответ:
anastassia7890
anastassia7890
06.09.2022 01:36
A = int(input())if 1: print('Зима')else:  if 2: print("Зима")  else:    if 3: print("Весна")    else:      if 4: print("Весна")      else:        if 5: print("Весна")        else:          if 6: print("Лето")          else:            if 7: print('Лето')            else:              if 8: print("Лето")              else:                if 9: print("Осень")                else:                  if 10: print("Осень")                  else:                    if 11: print("Осень")                    else:                       if 12: print("Зима")                      
0,0(0 оценок)
Ответ:
Варюша221204
Варюша221204
11.10.2021 10:46
//Pascal
  var a,b, I, maxsumm, max : integer;
 
  function summdel(x:integer):integer; //результат - сумма делителей х
  var k,sum:integer;
  begin
    sum:=0;
    for k := 1 to x div 2 + 1 do
      if x mod k = 0 then sum:= sum+k;
    summdel:=sum;
  end;
 
  begin
   writeln('Введите границы a,b ');
   readln(a,b);
    maxsumm := 1;
    max := 1;
    for i := a to b do
     begin
        if summdel(i) > maxsumm then
          begin maxsumm:= summdel(i);
            max := i;
          end;
     end;
     writeLn('Максимальная сумма делителей - ', maxsumm, ' число - ',max)
  end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота