// PascalABC.NET 3.0, сборка 1128 begin var a:=ArrRandom(70,1,100).PrintLn; Writeln('Количество элементов, кратных трем: ', a.Where(x->x mod 3=0).Count); var p:=a.OrderByDescending(x->x).Take(4).ToArray; if (p[0]=p[1]) and (p[0]=p[2]) and (p[0]<>p[3]) then Writeln('В массиве ровно три одинаковых максимальных элемента') else Writeln('В массиве не три одинаковых максимальных элемента'); Writeln('Массив, из которого удалены элементы с нечетными значениями'); a.Where(x-> not Odd(x)).PrintLn end.
1. Рабочий стол – область экрана, на которой отображаются окна (в том числе диалоговые), значки и меню.2. Окно – ограниченная (прямоугольная) часть экрана, предназначенная для выполнения одной программы или отдельной ее функции.3. Значок и ярлык (пиктограмма) – ссылка на любой элемент, доступный на компьютере или в сети, такой как программа, файл, папка, диск, веб-страница , принтер или другой компьютер.4. Кнопка – элемент, который после воздействия на него (например, выполнения пользователем щелчка кнопкой мыши) запускает некоторую последовательность действий.5. Панель – группы логически взаимосвязанных значков, элементов управления и индикации состояния операционной системы или выполняющейся программы.6. Меню – набор команд, действий, режимов, установок и т.д.7. Папка – элемент , предназначенный для группировки файлов по какому-либо признаку.8. Приложение – прикладная программа.9. Документ – самостоятельный файл, созданный в приложении и получивший при сохранении имя, с которого он будет использоваться в дальнейшем.
1*2048+
0*1024+
1*512+
0*256+
0*128+
1*64+
1*32+
1*16+
1*8+
0*4+
1*2+
1*1+
=
6779 в десятичной
или
1+0*2=1
1+1*2=3
0+3*2=6
1+6*2=13
0+13*2=26
0+26*2=52
1+52*2=105
1+105*2=211
1+211*2=423
1+423*2=847
0+847*2=1694
1+1694*2=3389
1+3389*2=6779