Напряжение на входе усилителя Uвх = 25 мВ. Коэффициент усиления по напряжению К = 30. Сопротивление нагрузки усилителя 40 Ом. Определить мощность нагрузки усилителя.

Uвых=K*Uвх=750мВ=0.75В,

Р=Uвых²/R= 0.75²/40=0.014 Вт= 14 мВт

program p_1; var i, n : integer; a, s : real; b : array [1..1000] of real; begin writeln('введите число а'); readln(a); writeln('введите количество значений массива n'); readln(n); write('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if b[i] > a then s: =s+b[i]; writeln('сумма значений =', s); end.

program xxx;

  var n, c, d, e, s : integer;

begin

    write('введите число');

    readln(n);

    c: = n div 100;

    d: =(n div 10) mod 10;

    e: = n mod 10;

    s: = c + d + e;

    writeln('сумма чисел =', s);

    readln

end.