Составить программу в паскале. найти минимальный элемент массива а(т,т), число т и элементы массива вводятся с клавиатуры.
258
323
Ответы на вопрос:
Var i,j,t,n,min: longint; begin read(t); for i : = 1 to t do for j : = 1 to t do begin read(n); if (i = 1) and (j = 1) then min : = n else if n < min then min : = n; end; writeln(min); end.
Популярно: Информатика
-
usenova199303.01.2020 02:49
-
Galia812.07.2022 07:01
-
vaniev200610.10.2022 10:19
-
missisruso03.01.2023 02:16
-
учеба635829.04.2023 14:13
-
Galya0305.12.2020 21:13
-
bahyt06108918.12.2020 05:15
-
22196715.09.2020 15:17
-
samsianna200313.08.2020 06:50
-
0316618.02.2020 01:46