На заключительной стадии анализа осадок (форму осаждения) после фильтрования и промывания высушивают или прокаливают и получают в результате такой термической обработки гравиметрическую форму — соединение, пригодное для взвешивания. Высушивание или прокаливание осадка продолжают до тех пор, пока его масса не станет постоянной, что обычно рассматривается как критерий достигнутой полноты превращения формы осаждения в гравиметрическую форму и указывает на полноту удаления летучих примесей — растворителя, адсорбированных солей аммония и т. д. Осадки, полученные в результате реакции с органическим осадителем (диметилглиоксимом, 8-оксихинолином и др.), обычно высушивают, осадки неорганических соединений, как правило, прокаливают.
Поделитесь своими знаниями, ответьте на вопрос:
Напишите процедуру, которая cчитает количество равных элементов в массиве в переменную i.
type t_mass= array [1..n] of integer;
procedure kol(a:t_mass; var k:integer);
var i:integer;
begin
i:=1;
while (i<n) and (a[i]=a[i+1]) do inc(i);
k:=i;
end;
var i:integer;
a:t_mass;
Begin
for i:= 1 to n do
read(a[i]);
kol(a,i);
write(i);
end.