Заполните двумерный массив размерностью 3*2 случайными числами в диапазоне от -30 до 50. определите квадрат минимального элемента.
111
146
Ответы на вопрос:
Program sss; var i,j,n: integer; a: array[1..2,1..3] of integer; begin n : = 51; for i: =1 to 2 do begin for j: =1 to 3 do begin a[i,j] : = random(-30,50); write(a[i,j],' '); if a[i,j] < n then n : = a[i,j]; end; writeln; end; write(n*n); end.
Популярно: Информатика
-
прост123222.08.2022 16:34
-
хэюяфй13.08.2020 11:21
-
nikitabelokon2126.09.2020 12:55
-
annswi20.11.2020 17:49
-
GAMAEW6601.06.2023 16:11
-
alesa600230.03.2023 23:37
-
denisenkovaleri08.11.2021 00:35
-
Lera2010K31.12.2020 13:17
-
пистолетМакарова10.06.2022 14:08
-
Макоська26.02.2023 09:27