Дана последовательность действительных чисел a1, a2 аn. указать те ее элементы, которые принадлежат отрезка [c, d].

Var   n, t, c, d: integer; begin   readln(n, c, d);   for i: integer : = 1 to n do   begin     readln(t);     if not (t in [c..d]) then       write('не ');     writeln('принадлежит')   end; end.

1)m(hcl)=50*0.292=14.6г

2)n(hcl)=m/m=14.6/36.5-=0.4моль

3)n(оксида металла)=0,4/2=0,2

4)m(оксида металла)= 8/0,2=40

5)раз металл двухвалентен, то значит формула - meo, следовательно вычти из молярной массы оксида массу кислорода

м(металла)=40-16=24

следовательно, mgo 

 

 

var

  x: real;

begin

  readln(x);

writeln(x: 0: 0);

end.