<span>написать программу, которая считает интеграл функции f(x) = ln(x^2*корень из x) на [3;6] по методу прямоугольников с шагом по аргументу = 0,3.....
</span>
Как-то так я понял...
var
price:real;
i:byte;
begin
write('Введите стоимость 1 кг конфет ');
readln(price);
for i := 1 to 12 do
writeln('Стоимость ', i / 5 :3:1, ' кг конфет состаляет ', i * price / 5:0:2, ' руб.');
end.
n мощность алфавита
i инф объём
N=2i(в степени )
I инф объём одного сообщения
K колич символов в сообщении
I= K*i
K = I делить на i
Для вычисления используется формула I=log₂N=log₂15≈4
Program z;{a1=6,d=}const n=7;var a:array[1..n] of real;a1,i:integer;d:real;begina1:=6;d:=(49-6)/7;for i:=1 to n do begina[i]:=a1+(i-1)*d;writeln(a[i]:3);end;
end.