110 (в двоичной) = 2^2 + 2^1 = 6 (в десятичной), соответственно,
100 * 6 = 600 (в десятичной).
Program n1;
var a,b: integer;
begin
readln(a,b);
writeln('срзнач: ',(a+b)/2);
write('сргеом: ',sqrt(a*b));
end.
Var x1,x2, dx, x:integer;
begin
readln(x1, x2, dx);
x:=x1;
write('x':3);
writeln('y':3);
repeat
write(x:3);
writeln(x*2:3);
x:=x+dx;
until x>x2;
end