Регистрация
12345678298
30.03.2021 12:43
Информатика
Есть ответ 👍

Как поставить данное условие в pascalABC.NET
двоичная запись числа не заканчивается на 000.

256
439
Посмотреть ответы 2

Ответы на вопрос:

Vladikf01Vlad220
Vladikf01Vlad220
4,6(17 оценок)

Вот пример кода программы:

var a:integer;

begin

 a := 101010100;

 if ((a mod 1000 <> 0) or (a mod 10000 = 0)) then  

   writeln('Не заканчивается на 000')

 else

   writeln('Заканчивается на 000');

end.

Maro8821
Maro8821
4,6(53 оценок)
Оконъюнкции - она верна тогда и только тогда, когда верны все высказывания, входящие в её состав.

Популярно: Информатика