Выяснить, делится ли одно натуральное число на другое без остатка, используя операцию вычитания
10-11 класс
|
program minus;
var a,b:integer;
begin
read(a, b);
while ((a <> 0) and (a >= b))
begin
dec(a,b);
end;
if (c=0) writeln('делится') else writeln('не делится');
readln;
end.
Если это конечно задача паскаля
Другие вопросы из категории
http://cs309224.vk.me/v309224156/5a57/fT3rlMe9o9k.jpg
элемента в массиве,а также количество отрицательных чисел.
2. Дан массив целых чисел. Верно ли,что сумма элементов массива есть четное число.
3. В массиве хранятся сведения о количестве осадков,выпавших за каждый день января. Определить общеее количество осадков за месяц и среднее количество за день.
Читайте также
о x появляется 2x). При нажатии на другую кнопку число увеличивается на 1 (вместо x появляется x+1). Как надо нажимать на кнопки, чтобы на экране появилось
a) Число 5
b) Число 99
c) Число 99,если разрешается нажимать на кнопки не более 10 раз?
A. Умножить текущее число на 2.
B. Прибавить к результату 1.
C. Если получившееся число больше или равно 17, вычесть из него 17.
Какое получится число, если повторить этот алгоритм 7 раз для исходного
числа 4?
1) 9
2) 10
3) 13
4) 4
написать программу, которая отвечает на вопрос " существуют ли два последовательных числа, не превосходящих N, сумма цифр каждого из которых делится на k?"
Входные данные: Два числа N(1<=N<=10000000000),k (1<=k<=100)
Выходные данные: Программа выводит два таких числа, если они существуют,"NO"- если нет.
которая отвечает на вопрос: "Существуют ли два последовательных числа, не превосходящих , сумма цифр каждого из которых делится на ?"
Входные данные. Два числа
Выходные данные. Программа выводит два таких числа, если они существуют, "NO" - если нет.