Информатика. 11 класс.
6 прочитайте ниже текст, взятый из книги «юношеские суб- культуры урала: мини-энциклопедия» (екатеринбург: союз юнкоров, 2005). «при существовании в мире мощного слоя базовой культуры у молодо- го человека вдруг возникает стремление отгородиться, уйти в глубину -- «под» культуру (лат. sub -- под + культура), искать или создавать авто- номную, независимую субкультуру. явление это возникло не вдруг и имеет свою и соответственно модели бытования. еще в на- чале века в екатеринбурге и перми появились "волчата", «огарки», выстраивающие свое мировоззрение как инакомыслящие, инакочувствующие. затем были клубы любителей самодеятельной пес- ни и клубы любителей фантастики, стремящиеся встать над суетой, об- ращавшиеся к вечным ценностям в противовес классовым, хиппи, про- поведовавшие любовь и уходившие в противостояние. хх век усложнил социокультурное пространство, стала толерантность, которая породила множество новых культурных модификаций. теперь меняется модель субкультуры - она стремится упорядочить окружаю- щий хаос, ограничить свой мир, создать какую-то защищенность, действуя в соответствии с собственными законами»,
a) взяв слова «молодой человек» в качестве ключевых, сверните эту ин- формацию с стратегии магнита.
б) выполните то же , взяв слово "инакомыслящие" как ключевое.
2^3 < 10, 3^3 > 20
2) Если x(x+1) > 10, то (x+1)(x+2) < 10. Это верно при x = -4
(-4)(-3) = 12 > 10; (-3)(-2) = 6 < 10
Но при x = 2 будет ложная посылка (2*3 > 10 - это ложно),
из которой следует ложный вывод 3*4 < 10.
Поэтому импликация верна. ответ x = 2
3) Если x(x+1)(x+2) > 25, то x < x-1
Это сложнее. x < x-1 - ложно при любом х.
Импликация будет истинной, только если посылка ложная.
x(x+1)(x+2) > 25 - должно быть ложно. Это при x = 2.
x(x+1)(x+2) = 2*3*4 = 24.
const
n=20;
var
a:array[1..n] of integer;
i,imax,imin:integer;
s:longint;
begin
Randomize;
Writeln('Исходный ряд значений');
imax:=1; imin:=1;
for i:=1 to n do begin
a[i]:=Random(51)-25; Write(a[i],' ');
if a[i]>a[imax] then imax:=i
else
if a[i]<a[imin] then imin:=i
end;
Writeln;
if imax>imin then
Writeln('Максимальный элемент встретился позже минимального')
else begin
s:=0;
for i:=imax+1 to imin-1 do s:=s+a[i];
Writeln('Сумма элементов между максимальным и минимальным значением ',s)
end
end.
Тестовое решение:
Исходный ряд значений
10 -3 9 5 20 10 6 2 -19 -19 6 -24 -7 -1 23 11 -8 -16 -14 -25
Сумма элементов между максимальным и минимальным значением -27