4 да я знаю я это самастаятельную прохадил
Begin
var a:=ArrRandom(40,0,20).Println;
var s:=a.Where(x->x mod 3 = 0).Sum;
writeln('S = ',s);
end.
Пример:
8 11 7 18 1 9 10 16 5 1 15 17 15 20 12 7 15 18 2 15 0 7 19 4 7 17 2 19 3 11 1 15 1 2 3 4 18 5 7 1
S = 156
1) a x b = 1 при a=1 возможно (если b=1)
2) a x b = 1 при а=0 противоречиво, результат 0
3) a + b = 0 при a=1 противоречиво, результат 1
4) a + b = 1 при a=0 возможно (если b=1)
1100100+1111=1110011 в двоичной;
1110011=(1*2^6)+(1*2^5)+(1*2^4)+(0*2^3)+(0*2^2)+(1*2^1)+(1*2^0)=64+32+16+0+0+2+1=115 в десятичной.
<span>Словосочета́ние — это соединение двух или нескольких
знаменательных слов, связанных по смыслу и грамматически, служащее для
расчленённого обозначения единого понятия (предмета, качества, действия и
др.).</span>