// PascalABC.NET 3.2, сборка 1399 от 08.03.2017 // Внимание! Если программа не работает, обновите версию!
begin var a:=ArrRandom(100,-1000,1000); a.Println; var imax:=a.IndexMax; var imin:=a.IndexMin; Writeln('Индекс минимального ',imin+1,', максимального ',imax+1); if imin>imax then Swap(imin,imax); Writeln('Сумма на участке: ',a[imin:imax+1].Sum) end.
Я очень люблю и уважаю поэзию. Даже сама (Сам) пишу стихи. Почему мне нравится поэзия? Ну так сразу и не сказать. Когда я открываю томик стихотворений Пушкина или Есенина все проблемы уходят на второй план. Сразу приходить такая легкость, безмятежность (проверь По словарю это слово ). И все проблемы сразу решаемы . Мое любимое стихотворение "Жди меня " К. Симонова. Когда его читаешь слезы текут ручьем от того, как автор передал всю боль, весь страх того времени. Лично я вам советую почаще читать. Это увлекательно и полезно. как-то так )
самое 1 и 3 ведутся рили говорю