Что такое odd в паскале
Перейти к содержимому

Что такое odd в паскале

  • автор:

Что такое odd в паскале

Is a value odd or even ?

Declaration

Source position: systemh.inc line 894

Description

Odd returns True if X is odd, or False otherwise.

Errors

See also

Calculate absolute value

Return ordinal value of an ordinal type.

Example

Program Example43; begin If Odd(1) Then Writeln ('Everything OK with 1 !'); If Not Odd(2) Then Writeln ('Everything OK with 2 !'); end. 

Что такое odd в паскале

Odd (функция)
Навигация

Язык:
Русский
English

Проверяет параметр на нечетность.

Объявление

Function Odd(X : Longint) : Boolean;

Режим

Windows, Real, Protected

Замечания

Значение функции Odd(X) равно True, если X — нечетное число.

См. также

Пример

Язык:
Русский
English

begin
if Odd ( 5 ) then
WriteLn ( ‘Число 5 — нечётное’ )
else
WriteLn ( ‘Число 5 — чётное!?’ ) ;
end .

Код для вставки: :: :: :: ГОСТ ::

Поделиться: //

Для форумов:
Для блогов:
Для Википедии:

-

Функция Odd

Основы программирования 2.0

Функция Odd в Паскале определяет, является ли число чётным или нечётным. Синтаксис:

function odd(N : LongInt) : Boolean; function odd(N : LongWord) : Boolean; function odd(N : Int64) : Boolean; function odd(N : QWord) : Boolean;

Функция Odd возвращает TRUE, если число является НЕчётным. Иначе возвращает FALSE.

Как определить чётное число в Паскале

Если в функцию передано чётное число, то она возвращает FALSE. Следовательно, чтобы проверить, является ли число чётным, надо результат функции сравнить с FALSE:

if not Odd(x) then WriteLn(‘x — чётное число ‘);

Как определить нечётное число в Паскале

Если в функцию передано нечётное число, то она возвращает TRUE. Следовательно, чтобы проверить, является ли число нечётным, надо результат функции сравнить с TRUE:

if Odd(x) then WriteLn(‘x — нечётное число ‘);

Пример программы, где используется функция Odd:

program oddtest; var x : Integer; begin Randomize; x := Random(100); if Odd(x) then //Если число нечётное WriteLn('x = ', x, ' - odd number') else //Если число чётное WriteLn('x = ', x, ' - even number'); WriteLn('Press ENTER. '); //Вывести числа от 1 до 8 в два столбца for x := 1 to 8 do if Odd(x) then Write(x, ' ') else WriteLn(x); WriteLn('Then end. Press ENTER. '); ReadLn; end.

Что в Паскале за функция Odd?

определяет является ли целое число нечетным. т. е. возвращает true для нечетных, false для четных.
Это типа такое экстремальное ускорение с проверкой всего одного бита вместо использования тяжелой операции целочисленного деления 🙂

Остальные ответы

Похожие вопросы

Ваш браузер устарел

Мы постоянно добавляем новый функционал в основной интерфейс проекта. К сожалению, старые браузеры не в состоянии качественно работать с современными программными продуктами. Для корректной работы используйте последние версии браузеров Chrome, Mozilla Firefox, Opera, Microsoft Edge или установите браузер Atom.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *