Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона. вывести созданный массив на экран, расположив элементы в одну строку через пробелы. заменить все отрицательные элементы квадратом соответствующего индекса

270

284

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

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

Boss2009

Информатика

4,5(15 оценок)

Const n = 15; var i: integer; a: array[1..n] of integer; begin randomize; writeln('исходный массив'); for i : = 1 to n do begin a[i] : = random(100) - 50; write(a[i]: 6); if a[i] < 0 then a[i] : = sqr(i) end; writeln; writeln('результирующий массив'); for i : = 1 to n do write(a[i]: 6); writeln end. тестовое решение: исходный массив 3 37 40 17 20 -12 -27 4 34 -1 9 42 -6 -36 28 результирующий массив 3 37 40 17 20 36 49 4 34 100 9 42 169 196 28