===== PascalABC.NET =====
begin
// 1
var a := ArrRandom(7, -4, 5);
a.Println;
// 2
var b := ReadArrInteger('Введи 8 чисел:', 8);
Println('Сумма четных:', b.Where(p -> p.IsEven).Sum);
var p := b.Where(p -> p > 4).DefaultIfEmpty.Product;
if p >0 then
Println('Произведение элементов, больших 4:', p)
else
Println('Нет элементов, больших 4');
// 3
var c := ArrRandom(10, -14, 7);
c.Println;
Print('Минимальный элемент, больший 5');
var m := c.Where(p -> p > 5).DefaultIfEmpty.Min;
if m = 0 then
Println('отсутствует')
else
Println('равен', m);
var im := c.IndexMin;
Println('Миниммальный элемент номер', im + 1, 'равен ', c[im])
end.
![Максимум ! написать программы на языке паскаль: 1) дан массив, заданный на интервале [-4; 5], состоя](/tpl/images/1046/1295/27fb7.jpg)
при скачивании можно воспользоваться специально предназначенным для таких целей ПО в виде download-менеджеров,работу которых не сложно настроить по расписанию.Кстати, на любителей работать в Интернете в определенное время суток рассчитаны специализированные тарифные планы провайдеров и возможно взглянув на них под данным углом зрения, вы сможете подобрать себе более дешевый вариант доступа.
Существует и еще один момент. Как правило, при коммутируемом доступе большинство провайдеров учитывают только время доступа — в этом случае вы платите не за реально полученные данные, а за время, проведенное на линии. Но это вовсе не обязательно — наряду со временем доступа ряд провайдеров может параллельно учитывать и трафик, а возможно,есть и такие провайдеры,которые при модемном доступе, как и при работе по выделенным каналам связи,вообще учитывают только трафик. И здесь кроется один подводный камень.Если вы просто путешествуете по Интернету,то вы можете затрачивать много времени при достаточно небольшом трафике, а значит,вам выгоднее платить за трафик,а не за время.
