UCOZ Реклама

Для работы с целыми числами в языке Basic служат следующие операторы:

1) Оператор Y = INT(X) округляет до целого

дробное число X или результат деления A/B

Y = INT(A/B).

Тоже самое действие выполняет деление \

X = A \ B

Например, INT(3.5) = 3

X = INT(8/3) = 2

X = 8 \ 3 = 2

2) Оператор MOD делит одно число на другое

и возвращает только остаток деления: A MOD B.

Он вычисляет остаток от деления, например:

1. 14 MOD 5 = 4

2. 11 MOD 4 = 3

3. 17 MOD 3 = 2

4. 15 MOD 2 = 1


Пример 1: Определение чётности или нечётности числа.

CLS
INPUT "Введите число N=", N
IF N MOD 2 THEN PRINT "Число нечётное" ELSE PRINT "Число чётное"
END

Пример 2: Разработать программу нахождения и вывода
на экран всех чисел, оканчивающихся на 5,
и делящихся на 3, из диапазона чисел от 5 до 1000.

CLS
FOR i = 5 TO 1000 STEP 5
x = i MOD 3
IF x = 0 THEN PRINT i;
NEXT i
END

Пример 3: Определите, является ли число простым, или нет.
Натуральное число N называется простым,
если его делителями являются только два числа: 1 и N.

CLS
INPUT "Введите число N=", N
IF N <= 3 THEN GOTO 10
d = 2
IF N MOD 2 = 0 THEN GOTO 20
d = 3
FOR i = 1 TO N
d = d + 2
IF N MOD d = 0 THEN GOTO 20
IF N <= d * d THEN GOTO 10
NEXT i
10 PRINT "Число N-простое."
INPUT "Для продолжения - Enter.", z
END
20 PRINT "Число N-составное. Оно делится на"; d
INPUT "Для продолжения - Enter.", w
END

<< Возврат назад

Webmaster: Львовский М.Б.

Hosted by uCoz