Question

В массиве хранится информация о годе рождения каждого из 30 человек.Определить порядковый номер самого старшего по возрасту человека?

Answer 1

Var a:array[1..30] of integer;
i,k,min:integer;
begin
writeln('Введите годы рождения ');
for i:=1 to 30 do
begin
readln(a[i]);
end;
min:=a[1];
for i:=1 to 30 do
begin
if a[i]<min then 
begin
min:=a[i];
k:=i;
end;
end;
writeln('Порядковый номер самого старшего по возрасту человека равняется ',k);
end.

Answer 2

Для определения порядкового номера самого старшего человека в массиве годов рождения, необходимо выполнить следующие шаги:

1. Создайте массив, содержащий информацию о годе рождения каждого из 30 человек.
2. Инициализируйте переменную "max_year" (максимальный год) со значением первого элемента массива.
3. Инициализируйте переменную "max_index" (индекс максимального года) со значением 0 (индекс первого элемента массива).
4. Проходите по остальным элементам массива, начиная с индекса 1.
5. Если текущий элемент массива больше значения переменной "max_year", обновите значение "max_year" и "max_index".
6. После прохода по всем элементам массива, "max_index" будет содержать порядковый номер самого старшего человека.
7. Выведите значение "max_index".

Вот пример кода на языке Python, реализующий описанный алгоритм:

pythonCopy code
birth_years = [1990, 1985, 1978, 1995, ...]  # Замените значениями годов рождения

max_year = birth_years[0]
max_index = 0

for i in range(1, len(birth_years)):
    if birth_years[i] > max_year:
        max_year = birth_years[i]
        max_index = i

print("Порядковый номер самого старшего человека:", max_index)

Обратите внимание, что вам нужно заменить [1990, 1985, 1978, 1995, ...] на фактические значения годов рождения.