Как поставить данное условие в pascalABC.NET
двоичная запись числа не заканчивается на 000.
nikita5000011111
1
06.10.2020 12:18
18
Другие вопросы по теме Информатика
BlaSta
29.10.2021 23:39
Neznakomka111111
07.10.2019 23:50
Верониккка00
07.10.2019 23:50
LizaIlina1
07.10.2019 23:50
LI100K
22.06.2019 17:30
Кирюха33333
27.08.2019 13:40
Urtaol20
27.08.2019 13:40
user15042001
14.06.2019 01:20
Популярные вопросы
- Повествовательное предложение со словом чувство...
1 - Уякій країні зявилися переші школи?...
1 - Решить : велосипедист проехал 5 км по лесной дороге и 7 км по шоссе, затратив...
3 - Разделить слово по составу: объявление,рюкзак,доброта....
1 - Биотические факторы картофеля и его абиотические факторы...
1 - X2-10x=0, 10x+5x=0, 4x2-12=0, 3x2-6=0 решить, где стоит двойка это квадрат!...
1 - Фрезерный станок массой 300 кг установлен на четырех опорах, средняя площадь...
3 - Подобрать загадки, пословицы, поговорки на силу трения...
3 - Как называют телефон(сотовый) в разных странах 1 france 2 germany (g) 3 italy...
1 - Реши кроссворд-наоборот и поясни термины 1. специализация 2. потребность--...
1
Вот пример кода программы:
var a:integer;
begin
a := 101010100;
if ((a mod 1000 <> 0) or (a mod 10000 = 0)) then
writeln('Не заканчивается на 000')
else
writeln('Заканчивается на 000');
end.