Задача с массивом, про года рождения Опции

[null3d]

Помогите, плиз, с задачкой если есть лишняя минутка ;)

В масиве хранится информация о годе рождения 30 человек.Вывести самого старшего и самого молодого (1989-2000) - из этого интервала

Добавлено через 9 мин.

Код

Uses crt;
Const n=30;

Var   m: array [1..n] of integer;
          I: byte
g , min, max, r : integer;

begin
clrscr;
...
randomize;
for   i:=1 to n do
begin
m[i] := random (2000-1990+1)+1990;
end;

так правильно вроде?
не хватает только самого подсчёта максимального и минимального значения и его вывода.

Сообщение отредактировано: null3d - 10.05.2007 22:29