1)Нужно объяснение задания. 2)Иногда вместо слово «имеется» пишут «утолитель», «удвоитель», «калькулятор» и тд что это значит?

272

415

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

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

1234567891241

Информатика

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

Program delehka(input,output); var a: array[1..1000010] of longint; i,n,s,ma,mi,sl: longint; begin assign(input,'input.txt'); reset(input); assign(output,'output.txt'); rewrite(output); readln(n); mi: =(1 shl 30); ma: =-(1 shl 30); for i: =1 to n do begin read(a[i]); ma: =max(ma,a[i]); mi: =min(mi,a[i]); end; if ma=mi then write(0,'',n,'',0) else begin for i: =1 to n do begin if a[i]=ma then s: =s+1; if a[i]=mi then sl: =sl+1; end; writeln(s,' ',sl,' ',n-s-sl); close(input); close(output); end; end.