Дан массив D(n). Найти минимальный среди элементов, больших ...
Дан массив D(n). Найти минимальный среди элементов, больших суммы,и найти количество элементов, не равных максимальному. Написать программу в Паскале,пожалуйста)  
						
									
									Есть ответ
								
								
							
									12.12.2022
								
								372
									
								Ответ
program raf105;
const
  n = 10;
var
  d:array[1..n] of integer;
  min,max,sum,notmax,i: integer;
begin
max:= -10000;
min:= 10000;
writeln('Заполните массив');
for i:=1 to n do
begin
  readln(d[i]);
  sum+= d[i];
  if maxsum) and (d[i]
						 		
						Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей. 
						
Просто нажмите на кнопку "Подарить".
				
						
						Просто нажмите на кнопку "Подарить".
									12.12.2022
								
							 
								