1 -делать записи,изображать схему,думать,мыслить
2-готовить суп,рубить дрова,рисовать,наблюдать,резать картошку.
1. D:\SCHOOL\PHYSICS\
2. Е:\GROUP\COURSE\ACADEMY\
128 возможных вариантов.
Воспользуемся формулой N=2^i
i=7бит
<u>PascalABC.NET 3.3.5, сборка 1669 от 21.05.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ArrRandom(15,-50,50); a.Println;
Writeln('Отрицательных: ',a.Where(t->t<0).Count);
Writeln('Минимум: ',a.Min);
Writeln('Среднее арифметическое отрицательных: ',
a.Where(t->t<0).Average)
end.
<u>Пример</u>
-16 47 -41 -26 1 3 27 -28 -26 4 -19 -13 -16 38 20
Отрицательных: 8
Минимум: -41
Среднее арифметическое отрицательных: -23.125