<span>Клод Шеннон- основатель теории информации. Прожил достаточно долгую жизнь(1916-2001) Учённый,американский математик приложил свои руки к инженерии,кибернетики,электротехнике и теории информации. Мировую известность ему принесли "теории связи кодирования" Его отец ввёл понятие "бит"-как информационной единицы измерения. За свои неоценимые заслуги в революционных разработках отмечен многими наградами и премиями, в том числе и Нобелевской премией. </span>
X*x+2*x-15=0
решаем кв уравнение
x=3
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3><h2>№52</h2>
begin
var x := ReadReal('x =');
var F: real;
if x <= 3 then F := x * x - 3 * x + 9
else F := 1 / (x * x * x + 6);
Print(F)
end.
<h2>№54</h2>
begin
var x := ReadReal('x =');
var F: real;
if x <= -3 then F := 9
else F := 1 / (x * x + 1);
Print(F)
end.
Program aaa;
var
a,b,c,i,z:integer;
begin
randomize;
z:=0;
for i:=1 to 10 do begin
a:=random(9)+1;
b:=random(9)+1;
write(a,'*',b,'=');
readln(c);
if(c=a*b) then inc(z);
end;
writeln('Из 10 заданий вы выполнили ',z,' заданий!');
end.