12 var 3 s : string; 4 begin 5 readln (s ); 6 while pos ( 'с' ,s )> 0 do delete (s ,pos ( 'с' ,s ) ,1 ); 7 writeln (s ); 8 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
n,a: integer;
begin
readln(n);
a: =(n mod 10)*1000+((n mod 100) div 10)*100 + ((n mod 1000) div 100)*10+ n div 1000;
if n> a then
writeln('число ', n, ' больше перевертыша ', a)
else
writeln('перевертыш ', a, ' больше числа ', n);
end.
Ответ дал: Гость
решаем относительно a: a=(-6*x2-c)/x4=-6*x2/x4-c/x4
Популярные вопросы