Ответ:
Переводим сантиметры в метры делением на 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.