Ориентированный граф (кратко орграф) — (мульти) граф, рёбрам которого присвоено направление. Направленные рёбра именуются также дугами, а в некоторых источниках и просто рёбрами.
<span>На доске по строчечке </span>
<span>Разместились кнопочки </span>
<span>Догадайтесь мальчики </span>
<span>Как здесь тыкать пальчиком? (Клавиатура) </span>
<span>Нет, она – не пианино, </span>
<span>только клавиш в ней – не счесть! </span>
<span>Алфавита там картина, </span>
<span>знаки, цифры тоже есть. </span>
<span>Очень тонкая натура. </span>
<span>Имя ей ...(Клавиатура). </span>
<span>То-то радость, то-то смех </span>
<span>На бумаге, без огрех, </span>
<span>Из какой коробки лезет </span>
<span>Текст на удивленье всех? </span>
<span>(Принтер) </span>
<span>По ковру зверек бежит, </span>
<span>То замрет, то закружит, </span>
<span>Коврика не покидает, </span>
<span>Что за зверь, кто угадает? </span>
<span>(Мышка) </span>
<span>Не зверушка, не летаешь, </span>
<span>а по коврику скользишь </span>
<span>и курсором управляешь. </span>
<span>Ты – компьютерная...(Мышь). </span>
<span>Чудо-юдо чемодан </span>
<span>Лампа, кнопка да карман. </span>
<span>Он окутан проводами </span>
<span>Словно город Амстердам. </span>
<span>(Системный блок) </span>
Необходимо найти информационный объем сообщения?
I=k*i, где k - количество символов, i- количество бит на 1 символ.
i=㏒₂N, где N- количество символов в алфавите
i=㏒₂15=3,9
Количество бит должно быть целое число, поэтому округляем до 4
I=120*4=480 бит
Мы взяли функцию f(x) = sin(x)-2*cos(x).
В процедуру-функцию function можно вставлять любые функции
program func;
uses Crt;
var a, b, x, y:real;
function f(var x:real):real;
begin
f:=sin(x)-2*cos(x);
end;
begin
ClrScr; {Очистка экрана}
Write (' a= '); ReadLn(a);
Write (' b= '); ReadLn(b);
WriteLn;
x:=a;
while x<=b do
begin
y:=f(x);
WriteLn ('y(', x:1:0, ')= ', y:4:2);
x:=x+1;
end;
ReadLn;
end.