Составьте программу к : найти минимальный и максимальный элементы массива, состоящего из 10 целых чисел поиск решения: с (96, 900, 9, 500, -100, -46, -56, 68, 1, 901) 1) min: = c[1]; max: = c[1]; 2) min: = 9 , 500 > 9, -100 < 9 => min: = -100

277

295

Посмотреть ответы 2

Ответы на вопрос:

гений248

Информатика

4,4(72 оценок)

//pascalabc.net 3.1 сборка 1219 begin var a : = arrrandominteger(10, -900, 900); a.println; writeln('max = ', a.max); writeln('min = ', a.min); end.

vjfduxhufsnks46

Информатика

4,8(50 оценок)

// pascalabc.net 3.3, сборка 1627 от 27.01.2018 // внимание! если программа не работает, обновите версию! begin var n: =5; writeln('*** исходная матрица ***'); var a: =matrrandom(n,n,-50,50); a.println(4); writeln(4*a.colcount*'-'); var (k,p): =readinteger2('введите через пробел номера двух строк: '); if k.between(1,n) and p.between(1,n) then begin a.row(k-1).zip(a.row(p-,y)-> x*y).println; end end. пример *** исходная матрица *** -45 -38 -15 34 -13 1 -38 39 34 -25 24 -41 -4 -25 -48 5 -19 -43 -15 -31 -21 27 -31 23 -39 введите через пробел номера двух строк: 2 5 -21 -1026 -1209 782 975