Ответы на вопрос:
Var i, min, a, n: integer; begin min : = trunc(power(2, 31) - 1); readln(n); for i : = 1 to n do begin readln(a); if (a < min) then min : = a; end; writeln(min); end.
Популярно: Информатика
-
Vladimirhdjdn20.10.2020 03:55
-
1230a13.12.2021 05:05
-
andrey208528.11.2021 08:50
-
pomadaa09.04.2021 06:01
-
rozella201712.07.2020 15:56
-
watchdogs303.03.2022 10:43
-
Роли506.06.2023 03:30
-
Liza1605200629.03.2022 07:52
-
YeGoR1701.03.2022 09:11
-
skutovakseniya200427.10.2022 00:36