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

Имеется две ёмкости объёмом 7 литров и 4 литра. с ними можно выполнять следующие действия. 1) налить воду в четырёхлитровую ёмкость, заполнив её целиком, – н4. 2) налить воду в семилитровую ёмкость, заполнив её целиком, – н7. 3) перелить воду из семилитровой ёмкости в четырёхлитровую – п4 (четырёхлитровая заполняется до конца либо из семилитровой выливается вся вода). 4) перелить воду из четырёхлитровой ёмкости в семилитровую – п7 (семилитровая заполняется до конца либо из четырёхлитровой выливается вся вода). 5) вылить всю воду из четырёхлитровой ёмкости – в4. 6) вылить всю воду из семилитровой ёмкости – в7. изначально обе ёмкости пустые. пример. выполнив последовательность действий н7п4, получим 3 литра воды в семилитровой ёмкости и полностью заполненную четырёхлитровую ёмкость. запишите последовательность не более чем из 5 команд, в результате выполнения которых в одной из ёмкостей окажется 1 литр воды, а вторая будет пустой. если таких последовательностей можно составить несколько, то запишите любую из них. ответ нужен !

👇
Ответ:
dimasikmll
dimasikmll
15.10.2022
Н4П7Н4П7В7 ==> В 4 литровой ёмкости-1 литр, в 7 литровой-0 литров.
 
4,6(26 оценок)
Открыть все ответы
Ответ:
МурррKsKs
МурррKsKs
15.10.2022
Чтобы излишне не терять точность и не тратить лишнее время на вычисления, выведем рекуррентную формулу.
\displaystyle a_1= \frac{3}{2}; \\ \\ a_{i-1}=\frac{3^{i-1}\cdot (i-1)!}{[2(i-1)]!}; \\ \\ a_i=\frac{3^i\cdot i!}{(2i)!} = \frac{3\cdot3^{i-1}\cdot i\cdot(i-1)!}{2 i\cdot(2i-1)\cdot(2i)!}={ \frac{3i}{2i\cdot(2i-1)}\cdot a_{i-1}=\frac{3}{4i-2}\cdot a_{i-1}
В задании не сказано точно, как определять условие окончания суммирования. Примем, что суммирование завершается, если очередной член ряда не может изменить накопленную сумму больше, чем на ε, т.е.
|aₓ| ≤ ε.

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (ai1,eps,s,i):=(3/2,0.001,3/2,2);
  while true do begin
    var a:=3/(4*i-2)*ai1;
    if Abs(a)>eps then begin i+=1; s+=a; ai1:=a end
    else Break
    end;
  Writeln('S = ',s:0:3)
end.

Результат
S = 2.532

Напишите программу для суммы числового ряда. дан числовой ряд и малая величина е(эпсила). найдите су
4,6(50 оценок)
Ответ:
ванёк20012001
ванёк20012001
15.10.2022
Паскаль АВС

Program LoctarUgar;
uses crt;
const
  eps=0.001;

function fact(n : integer) : longint;
  begin
    if n <= 1
         then  fact := 1
         else   fact := n * fact(n - 1);
  end;

var
  t,s:real;
  i:integer;
begin
  writeln('*** Alphaeus is thinking... ***');
  writeln('***          OK             ***');
  writeln();
  writeln('Программа вычисляет частичную сумму ряда с заданной точностью');
  writeln('  Общий член ряда:  an = ((3^n)*n! )/ (2n)!');
  writeln('Вычисление прекратится, когда модуль очередного слагаемого станет меньше 0,001');
  writeln();
  s:=0;   i:=1;   t:=1;
  while t>eps do
    begin
      t:=(power(3,i)*fact(i))/(2*fact(2*i));
      s:=s+t;
      writeln('a(',i,')=',t:0:6,'  S=',s:0:6);
      i:=i+1;
     end;
  writeln();
  writeln('Сумма ряда равна',s:0:6);
end.
4,8(81 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ