var a,b,c,y,x,z:real;
begin
readln(a,b,c);
writeln('a = ',a);
writeln('b = ',b);
writeln('c = ',c);
writeln('y = ',(a-2)/(b*b-c):0:3);
writeln('x = ',(b*b+4*a*c)/(2*a):0:3);
writeln('z = ',(a/b)+(c/a)-((a*b+c*c)/(b*c)):0:3);
end.
var
x, y, s: integer;
begin
readln(x, y);
s := (2*x + y) * (x-y);
writeln(s);
end.
Vara1,b1,c1,p1,a2,b2,c2,p2,s1,s2:real;
Begin
read(a1,b1,c1);
p1:=(a1+b1+c1)/2;
read(a2,b2,c2);
p1:=(a2+b2+c2)/2;
s1:=sqrt(p1*(p1-a1)*(p1-b1)*(p1-c1));
s2:=sqrt(p2*(p2-a2)*(p2-b2)*(p2-c2));
if s1=s2 then
writeln('=') else
if s1>s2 then
writeln('>') else
writeln('<');
<span>End.</span>
|A| = 10 - число символов в алфавите
N = 10^1 - число различных вариантов
I = Log2 10 = 3,32 бит
Ответ: 4 бита