Program lol; var a: integer; begin for a: =100 downto 1 do begin if a mod 3 = 0 then writeln(a); end; end.p.s. в строке for a: =100 downto 1 do вместо 100 вставь нужное тебе значение советую меньше 1000 а то долго считает
Спасибо
Ответ дал: Гость
101110, 101111. в десятичной эти числа равны 46 и 47.
Ответ дал: Гость
оба ответа подходят в языке
но логичнее нет
просто у нет в 2 функции: согласие с отрицанием и отрицание отрицания
ответ нет, на рисунке белая скатерть
(я выразил отрицание к вопросу)
словом нет можно выразить и отрицание и согласие
да здесь вообще не подходит его не рассматривает
у нет 2 варианта либо согласие с отрицанием - нет, скатерть не белая. либо отрицание вопроса - нет, белая.
при этом первый вариант не верный так как скатерть белая, то есть единственно верный это - нет, скатерть белая (отрицание вопроса)
Популярные вопросы