Есть ответ 👍

Приведите примеры использования различных типов полей в таблицах.программа MS OfficeAccess

183
239
Посмотреть ответы 1

Ответы на вопрос:

ksp86450
4,4(65 оценок)

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.

Популярно: Информатика