6. Введите рост учащихся своего класса, организовав ввод следующим образом:

Введите количество учащихся в классе: 15
Вводите рост учащихся
учащийся номер 1: 165
учащийся номер 2: 170
учащийся номер 3: 156

Т.к. рост — это число, не забудьте указать тип данных массива integer. Решение выглядит так:

var a: array[1..100] of integer;
var n, m: integer;
begin
  write('Введите количество учащихся в классе: ');
  readln(n);
  writeln('Вводите рост учащихся');
  for var i := 1 to n do
    begin
    write('учащийся номер ', i, ': ');
    readln(a[i]);
    end;
end.
Другие задания