в массиве на 100 элементов (от -1000 до 1000) найти индексы самого большого и са...

December 2021 1 11 Report

в массиве на 100 элементов (от -1000 до 1000) найти индексы самого большого и самого маленького элемента, а затем сумму чисел находящихся между ними. (Паскаль)

Answers & Comments

BlackBerry2001 Begin
var a:=ArrRandom(100); a.Println;
if imax imax:=a[i];
k1:=i;
if imin> a[i] then
imin:=a[i];
k2:=i;
Writeln('Индекс минимального ',imin+1,', максимального ',imax+1);
if imin>imax then Swap(imin,imax);
Writeln('Сумма на участке: ',a[imin:imax+1].Sum)
end.

3 votes Thanks 1

Answers & Comments

pomogite pozhalujsta sostavit predlozheniyab5788337035176acc5c9f85af7b40cb1 24750

zapolnit massiv na 200 elementov psevdosluchajnymi chislami celymi ot 20 do 80

najti summu pervyh 441 nechetnyh chisel paskal3e30e1104403472a8e475226bc31b71a 65293

najti summu pervyh 441 nechetnyh chisel paskal

kak najti nuli funkcii promezhutki znakopostoyanstva i promezhutki monotonnosti fu

kakoj razmer shrifta luchshe vsego ispolzovat dlya prezentacii chtoby s proektora

sozdat massiv na 100 sluchajnyh chisel iz diapazona ot 1000 do 1000 pervye 50 p

reshite pozhalujsta eto legko no ya tuplyu

kakaya skorost u dikoj loshadi i u domashnej

v massive iz 10 chisel s plavayushej tochkoj najti kol vo polozhitelnyh i kol vo otr

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

Helpful Links

Helpful Social