Xsin3x+6cos3x найти производную функций

m, n, nok, t, i: longint;

begin

 Write('Введите через пробел два целых положительных числа- ');

 Readln(m, n);

 {Сначала ищем НОК - наименьшее общее кратное}

 if m = n then begin

   nok := m;

   t := m * m

 end

 else begin

   t := m * n;

   repeat

     if m > n then m := m - n else n := n - m

   until m = n;

   nok := t div m

 end;

 {Теперь умножаем НОК на числа натурального ряда,

  пока не дойдем до величины t=m*n}

 if nok = t then Writeln('Требуемых чисел нет')

 else begin

   i := 1;

   while (nok * i < t) do

   begin

     Write(nok * i, ' ');

     i := i + 1

   end

 end

end.

Тестовое решение:

Введите через пробел два целых положительных числа- 8 120

120 240 360 480 600 720 840

Введите через пробел два целых положительных числа- 35 620

4340 8680 13020 17360

Введите через пробел два целых положительных числа- 7 13

Требуемых чисел нет

Вероятность первого промаха: 0,35

Вероятность второго промаха: 0,18

ответ: 0,063

Пошаговое объяснение:

событие A1 - попадание при первом выстреле,

P(A1) - вероятность попадания при первом выстреле,

P(A1) = 0,65

событие A2 - промах при первом выстреле,

P(A2) - вероятность промаха при первом выстреле,

события A1 и A2 - противоположные, тогда

P(A2) = 1 - P(A1)

P(A2) = 1 - 0,65 = 0,35

событие B1 - попадание при втором выстреле,

P(B1) - вероятность попадания при втором выстреле,

P(B1) = 0,82

событие B2 - промах при втором выстреле,

P(B2) - вероятность промаха при втором выстреле,

события B1 и B2 - противоположные, тогда

P(B2) = 1 - P(B1)

P(B2) = 1 - 0,82 = 0,18

событие C - промах при обоих выстрелах,

P(C) - вероятность промаха при обоих выстрелах, то есть вероятность совместного появления двух независимых событий A2 и B2,

тогда

P(C) = P(A2) × P(B2)

P(C) = 0,35 × 0,18 = 0,063