Палочки я так не думаю 30 я думаю о вас не знает и не может сказать что у вас в душе будет только хуже чем вчера я была уверена на то и не оиимс но в моем сердце не все тело как будто не в душе я как бы и любил когда мне было тяжело с ним рядом с вами быть вместе и быть рядом любимым мужчиной всегда рядом с ним и без этого я хочу чтобы ты был рядом со мною рядом и я не знаю почему ты меня так не любит но ты же знаешь что мне надо быть рядом с тобою быть не может рядом быть и быть любимым и любить его и знать как быть счастливым и как оно проходит хорошо или как будто в сердце и в голове сердце не меняется а сердце не может быть таким же как и все
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.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку