-3 до 5 семь чисел то есть Y может равнятся семью разными числами
10-4*-2=18
10-4*-1=14
10-4*0=0
10-4*1=6
10-4*2=2
10-4*3=-2
10-4*4=-6
1. X & Y & Z ∨ ¬Z
2. ¬((X ∨ Y) & (Y ∨ Z) & (X ∨ Z))
Делаю это все таки будет в
===== PascalABC.NET =====
begin
ReadSeqInteger('Введите 12 чисел', 12)
.Count(p -> p.InRange(-9, 9)).Println
end.
var a,a1,a2,a3 : integer;
begin
readln(a);
a1:=a div 100;
a2:=(a mod 100) div 10;
a3:=(a mod 100) mod 10;
writeln(a1+a2+a3);
end.
а - само число, а1-число сотен, а2-число десятков, а3-число единиц