===== PascalABC.NET =====
begin
var a := ReadArrInteger(50);
a.Pairwise.Count( p -> p[0].InRange(100, 999) and
p[1].InRange(100, 999)).Println
end.
Держи ответ тебе ) надеюсь все понятно ) если что спрашивай )
Dim a as double
dim n as double
dim c as double
a=(textbox1.text)
n=(textbox2.text)
c=(a+1)n
(textbox3.text)=c
Не будут. Потому что РИСОВАНИЕ в библиотех графики Паскаля.
Правильным ответом является 3, есть формула каждая цифра числа начиная справа умнажается на 2 в степени от 0 и выше то есть если 11 то 1*2^0+1*2^1
12 это 2*2^0+1*2^1