Если границы индекса массива n1 и n2 соответственно, то количество элементов = n2-n1+1
1. [4..18]: 18-4+1=15
2. [3..11]: 11-3+1=9
3. [1..15]: 15-1+1=15
4. [10..28]: 28-10+1=19
в условии не говорится что у мальчиков было ТОЛЬКО два устройство, а значит мы не знаем были у них другие устройства или нет :)
многие современные (да и не очень современные) планшеты позволяют использовать их в качестве телефона или IP-телефона а значит мы не знаем с какого устройства Петя достает своих друзей.
Поэтому из условий можно однозначно утверждать только то что было 2 мальчика. Хотя в наше время нельзя гарантировать даже то что они оба были мальчиками...
Буду писать 4 цифры, 1 - A 2 - B 3 - C 4 - Результат
1)
0 0 0 1
0 0 1 0
0 1 0 1
0 1 1 0
1 0 0 1
1 0 1 0
1 1 0 0
1 1 1 0
2)
0 0 0 1
0 0 1 1
0 1 0 1
0 1 1 1
1 0 0 1
1 0 1 0
1 1 0 1
1 1 1 1
3)
0 0 0 1
0 0 1 0
0 1 0 1
0 1 1 0
1 0 0 1
1 0 1 0
1 1 0 0
1 1 1 0
4)
0 0 0 0
0 0 1 1
0 1 0 0
0 1 1 1
1 0 0 0
1 0 1 1
1 1 0 0
1 1 1 0
5)
0 0 0 1
0 0 1 0
0 1 0 0
0 1 1 0
1 0 0 0
1 0 1 0
1 1 0 0
1 1 1 0
Var
a, b, c, s:integer;
begin
s:=1;
readln(a, b, c);
if (a<=0) AND (b<=0) AND (c<=0) then
writeln('Среди чисел a, b, c нет положительных чисел')
else
begin
if a>0 then
s:=s*a;
if b>0 then
s:=s*b;
if c>0 then
s:=s*c;
writeln(s);
end;
end.
Если я не ошибся, то всё должно быть так :)))