Ответ:

Переводим сантиметры в метры делением на 100. Вещественный тип позволяет хранить, например, 1,72 м.

var heightCm, heightM: array[1..10] of real;
begin
  writeln('Рост в сантиметрах:');
  for var i := 1 to 10 do
  begin
    heightCm[i] := Random(155, 191);
    write(heightCm[i]:0:0, ' ');
  end;
  writeln;

  writeln('Рост в метрах:');
  for var i := 1 to 10 do
  begin
    heightM[i] := heightCm[i] / 100;
    write(heightM[i]:0:2, ' ');
  end;
end.