Приведите примеры использования различных типов полей в таблицах.программа MS OfficeAccess
183
239
Ответы на вопрос:
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.
Популярно: Информатика
-
Евгения20060522.08.2022 20:58
-
Sowa200608.04.2022 12:36
-
ynifar24.09.2021 22:51
-
tanyaG061216.06.2020 04:02
-
кувшинкаВейВей28.03.2021 06:59
-
Vika383931.03.2023 07:43
-
alinnnkaaa20.05.2022 00:47
-
Zakharova200729.10.2021 05:57
-
viruvz21.12.2022 23:09
-
AnastasiaStoyn29.12.2020 21:53