Ответы на вопрос:
Var a: array[1..33] of integer; i,n: integer; begin for i: = 1 to 33 do begin a[i]: =random(41)-14; write(a[i],' '); end; n: =1; for i: = 2 to 33 do if a[i]< a[n] then n: =i; writeln; writeln('индекс минимального элемента массива: ',n); end.
Популярно: Информатика
-
anhelinayeremenko3019.07.2022 15:10
-
masha00700921.12.2020 05:06
-
karinaandreevozb5ha29.09.2021 11:07
-
qofepvcqj06.09.2022 12:05
-
enni0009.06.2020 06:12
-
AlinaAlina267223.12.2021 00:49
-
Kojjd11.01.2023 01:13
-
Ане4ка2116.10.2021 10:53
-
Djamila110809.07.2022 12:13
-
Даниил1234566619.10.2022 14:42