===== 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)
Информация на компьютере хранится в структурированном виде. Есть система. На жестком диске размечены логические диски. Чаще всего это либо диск С, либо диски С и D.
Каждый диск представляет из себя древовидную структуру директорий или иначе каталогов (нынче именуемых ПАПКИ) в которых хранятся файлы и, возможно, поддиректории/подпапки.
К нашей задаче.
Пользователь работал с каталогом Автомобили. Затем он поднялся на один уровень выше, затем спустился на 2 ниже и попал в
С:\Транспорт\Сухопутный\Почтовый\Железнодорожный
получается, на 2 уровня выше будет
С:\Транспорт\Сухопутный\.
А на один ниже - тот из которого начинает путь пользователь - Автомобили, получаем
ОТВЕТ: С:\Транспорт\Сухопутный\Автомобили.
Аналогичная задача.
Пользователь находился в каталоге Расписание.Сначала он поднялся на один уровень вверх, затем ещё раз поднялся на один уровень вверх, потом спустился на один уровень вниз. В результате он оказался в каталоге
С:\учёба\информатика\ГИА.
Укажите полный путь каталога, с которым пользователь начинал работу.
1) С :\учёба\информатика\2013\Расписание -- верный ответ
2) С:\учёба\Расписание
3) С:\учёба\2013\Расписание
4) С :\учёба\информатика\Расписание
ответ: оба верны
Объяснение: свойство может возвратить как Правду или ЛОЖ
так и Количество квартир, нужно хорошенько знать определения свойства объекта.