Дан массив d(n). удалите из массива все элементы, равные минимальному. выведите на экран исходный и полученный массивы.

169

266

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

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

DeRellik

Информатика

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

Const n=5; var i,x,q: integer; d: array [1..n] of integer; begin writeln ('заполните массив); for i: =1 to n do read (d[i]); x: =d[1]; for i: =2 to n do if x> d[i] then x: =d[i]; writeln ('минимальный элемент : ',x); for i: =1 to n do write (' ',d[i]); writeln; for i: =1 to n do if d[i]< > x then begin q: =q+1; d[q]: =d[i]; end; for i: =1 to q do write (' ',d[i]); end.должно быть так. p.s. программа написана на языке pascal abc.

romasivtsov

Информатика

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

С#: private static void main() { int[] array = {2,2,2,3,4,4,6,6,6,6}; for (var i = 0; i < array.length; i++) console.write($"{array[i]} "); console.writeline(); var counter = 0; for (var i = 0; i < array.length - 1; i+=2) if (array[i] % 2 == 0 & & array[i + 1] % 2 == 0) counter++; console.writeline($"количество четных пар чисел в массиве: {counter}"); }