Класс сформировать массив роста учеников класса в метрах Затем на его основе сформирован второй массив роста учеников класса в сантиметрах и вывести оба на экран

var A: array [1..100] of real; i,n: integer; begin writeln('Введите кол-во учеников: '); readln(n); writeln('Введите их рост в метрах поочередно: ');  for i:=1 to n do readln(A[i]); writeln('Рост учеников в метрах: ');  for i:= 1 to n do writeln(A[i],' м'); writeln('Рост учеников в сантиметрах: ');  for i:= 1 to n do writeln(A[i]*100,' см'); end.