120:2= 60. это ноль
60:2= 30 это ноль
30:2=15 это ноль
15:2= 7 и единица
7:2= 3 и единица
3:2= 1 и единица
и получается 1111000
===== PascalABC.NET =====
function AllEven(n: integer): boolean;
begin
Result := True;
while n > 0 do
begin
if (n mod 10).IsOdd then
begin
Result := False;
exit
end;
n := n div 10
end;
end;
begin
var (a, b) := ReadInteger2;
var k := 0;
for var i := a to b do
if AllEven(i) then
k += 1;
Write(k)
end.
Средняя глубина Черного моря — 1271 м, наибольшая- 2245 метров (вблизи Синопа). Протяженность моря между западной и восточной точками —около 1167 км, между северной и южной-624 километра. Наименьшая протяженность акватории в меридиональном направлении, между Крымом и берегом Анатолии (азиатской части Турции), 263 км. Длина береговой линии Черного моря — 4090 км, коэффициент изрезанности — около 1,8.<span>На площади, занятой Черным морем, можно разместить две Великобритании. Азовское море соединяется с Чёрным морем Керченским проливом. Площадь его — около 38000 кв. км. Преобладающие глубины — 9-13 м, наибольшая — 14,5 м. Берега изрезаны слабо. Крупнейший залив - Таганрогский; у западного берега - система мелких заливов Сиваш. Южный берег моря холмистый, для северного и северо-восточного берегов характерны косы. В Азовское море впадают реки Дон, Кубань и другие, образуя лиманы. Климат континентальный, средняя температура воздуха летом +23?-24?, зимой -7 ?С. С конца декабря до конца февраля покрывается льдом. Течения неустойчивы. Вода отличается мутностью, море богато рыбой: судак, лещ, кефаль, осётр, и т. д. Главные порты: Ростов-на-Дону, Таганрог, Азов.</span>
using System;
using System.Collections.Generic;
using System.Linq;
internal class Program {
private static void Main() {
do {
Console.Write("x = ");
var x = double.Parse(Console.ReadLine() ?? throw new InvalidOperationException());
Console.Write("y = ");
var y = double.Parse(Console.ReadLine() ?? throw new InvalidOperationException());
Console.WriteLine($"A({x}, {y}) => {ContainsPoint(x, y)}");
} while (true);
Console.ReadKey();
}
private static string ContainsPoint(double x, double y) {
var values = new List<double> {
-(x - 70),
x - y,
y
};
if (values.Any(v => v < 0))
return "Нет";
return values.Any(v => Math.Abs(v) < 0.01) ? "На границе" : "Да"; // Math.Abs(v) < 0.01 сравнение с 0
}
}