помогите пожалуйста,выполняется в абс паскаль прошу))) найти количество максимал...

April 2021 1 5 Report

помогите пожалуйста,выполняется в абс паскаль прошу)))
найти количество максимальных и минимальных элементов в одномерном массиве и заменить их,их суммой.

Answers & Comments

clinteastwood2 Uses crt;const n=5;var a:array[1..n] of integer; i,max,min: integer;begin clrscr;for i := 1 to n do begina[i]:=random(20);write(a[i]:4);end;for i := 1 to n do beginmin:=maxint;if a[i]>max then max:=a[i];if a[i]<min then min:=a[i];end;writeln;for i := 1 to n do beginif ((a[i]=max) or (a[i]=min)) then a[i]:=max+min;write(a[i]:4);end; writeln;writeln('max = ', max, ' min = ', min);end.

Answers & Comments

pomogite srochnoperevedite na anglijskij upotreblyaya glagoly to be v forme prese37d20e8f7d26d85cdbc9905ddb7343b 63642

pomogite srochnoperevedite na anglijskij upotreblyaya glagoly to be v forme pres9cbd3a8abd3f8a88818fa508ef357a31 17474

pomogite srochnoperevedite na anglijskij upotreblyaya glagoly to be v forme pres0c8e85a5ce19fc7a3d6dc4c6ecba6f12 2417

pomogite srochnoperevedite na anglijskij upotreblyaya glagoly to be v forme pres

pomogite pozhalujsta och nado schetchik gejgera korotko napisat 1 dlya chego n

pomogite pozhalujsta 1pochemu v pishevyh cepyah ot pervogo pishevogotrofichesko

chto opredelyaet dlya massiva x1n sleduyushij algoritm pomogite r 0 for k 1

reshite pozhalujsta ochen nado proshuuuuuuu 4 chto opredelyaet dlya massiva x1n s

chto opredelyaet dlya massiva x1n sleduyushij algoritm p 0 for k 1 to n do

chto opredelyaet dlya massiva x1n sleduyushij algoritm r n for k 1 to n do

рекомендуемые вопросы

Helpful Links

Helpful Social