Ответы на вопрос:
program cl; var a: array[1..n]of integer; x,i: integer; begin for i: =1 to n do begin write('vvesti element') read(a[i]); end; for i: = 1 to n do writeln(a[i],' '); writeln; min: =a[1]; for i: =1 to n do begin min> a[i] then min: =a[i] end: end.
Популярно: Информатика
-
Katyakaran16.05.2020 05:33
-
jvdvzkris16.02.2020 22:20
-
Georgiy1111108.05.2023 12:46
-
Eva34567811.02.2021 21:00
-
aruukewa12311.12.2022 00:00
-
jsjdnnx22.01.2020 13:59
-
Амишка5128.07.2020 05:59
-
Keepcryingpikka07.08.2022 15:37
-
55636906ррлиод10.09.2021 23:59
-
Топовый111203.03.2023 15:45