program approximation; var m: array[1..40] of real; s,v: real; i,k: integer; begin s: =0; for i : = 1 to 40 do begin write ('введите ',i,'-й элемент массива'); readln(m[i]); s: =s+m[i]; end; s: =s/40; v: =m[1]-s; for i : = 2 to 40 do begin if (v< (m[i]-s)) then begin v: =m[i]-s; k: =i; end; end; writeln (k,'-й элемент наименее отличается от среднего ',s); end; end.
рассмотри картину и.и. левитана "весна. большая вода"
в струе кислорода сожгли образец вещества. при сгорании 1,71г вещества a выделилось 2,64г оксида углерода (iv) и 0,99г воды. молярная масса вещества a 342г/моль. найдите молекулярную формулу этого вещества и назвать её..
program approximation; var m: array[1..40] of real; s,v: real; i,k: integer; begin s: =0; for i : = 1 to 40 do begin write ('введите ',i,'-й элемент массива'); readln(m[i]); s: =s+m[i]; end; s: =s/40; v: =m[1]-s; for i : = 2 to 40 do begin if (v< (m[i]-s)) then begin v: =m[i]-s; k: =i; end; end; writeln (k,'-й элемент наименее отличается от среднего ',s); end; end.
1)оксид меди(ii)+солянная кислота-> 2)оксид углерода(iv)+оксид кальция-> 3)оксид марганца(vii)+вода-> 4)оксид фосфора(v)+оксид азота(ii)-> 5)оксид натрия+зотная к-та-> 6)оксид бария+оксид кальция-> 7)оксид калия+вода -> 8)
рассмотри картину и.и. левитана "весна. большая вода"
в струе кислорода сожгли образец вещества. при сгорании 1,71г вещества a выделилось 2,64г оксида углерода (iv) и 0,99г воды. молярная масса вещества a 342г/моль. найдите молекулярную формулу этого вещества и назвать её..