Задайте массив из 10 элементов с датчика случайных чисел. замените все элементы с нечетными индексами на минимальный. выведите на экран исходный и полученный массивы.

138

395

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

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

нрррлртптп

Информатика

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

Writeln( 'src' ); for i : = 1 to 10 do begin a[ i ] : = random(100); writerln( 'a[ ', i, '] = ', a[ i ] ); if (i = 1) or (a[ i ] < min) then min : = a[ i ]; end; writeln( 'result' ); for i : = 1 to 10 do begin if (odd(i)) then a[ i ] : = min; writerln( 'a[ ', i, '] = ', a[ i ] ); end;