Помощь - Поиск - Пользователи - Календарь
Полная версия: задача на кол-во чисел
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
hideo
Помогите пожалуйста. я уже мозги сломал. нужно вычаслить количество чисел n.
N нечетны и отрицательны и удовлетворяют условию a^k<2^k.
я не прочь подумать, но время поджимает.
или хоть скажите как проверку на нечетность и отрицательность организовать.
Хотя полная прога все же лучше ^_^
Дож
Цитата
хоть скажите как проверку на нечетность и отрицательность организовать.


(n<0)or(n div 2 = 0)

hideo
забыл числа n натуральные
hideo
спасибо
Дож
извини, но тебе нужна фун-ция and:

(n<0)and(n div 2 = 0)

volvo
Цитата
проверку на нечетность и отрицательность

(n<0) and (n div 2 = 0)

у тебя не сработает... Только вчера было нечто подобное... придется брать по модулю:
(n<0) and (abs(n) div 2 = 0)
Дож
А кстати здесь не перепутанны Div и mod??? blink.gif

Программа
Код

begin
 Writeln(-100 mod 2);
 readln;
end.

выдала 0.
А программа
Код

begin
 Writeln(-100 div 2);
 readln;
end.

Выдала -50.
volvo
Ну, так вопрос-то в первую очередь к тебе: ты ж отвечал первым ...
Дож
Ответ:
Код

(n<0) and (abs(n) mod 2 = 0)


А зачем нужно abs?..
volvo
Цитата(Дож @ 4.12.2005 19:57)
извини, но тебе нужна фун-ция and:
(n<0)and(n div 2 = 0)

Ты здесь mod видишь? mad.gif
А я показал тебе, что твое выражение НЕ сработает так, как надо. Тебе что, на пальцах объяснять надо?

Что за люди, любую тему загадят/сведут к флейму ...
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.