У Пети Костылькова день рождения и он принес конфеты, чтобы
угостить одноклассников и, конечно же, свою любимую учительницу Снежану Денисовну.
Чтобы сделать праздник более увлекательным, Снежана Денисовна предложила пронумеровать
конфеты целыми числами между a и b (включая и сами эти числа) так, что каждому числу
соответствовала ровно одна конфета. Кроме
того, она поведала детям, что те конфеты, номера которых не делятся на
некоторое целое число n, наверняка невкусные, и поэтому их она заберет себе.
Вкусные же конфеты, то есть такие, номера которые делятся на n, Снежана Денисовна
оставит детям. Учащиеся с урока математики помнят, что число x называется
делящимся на y, если существует хотя бы одно целое число k такое, что x=ky, но
не знают соглашаться ли им на предложенный учительницей вариант или нет.
Поэтому они просят вас посчитать каких чисел будет больше – делящихся на n или
неделящихся.
Входные данные:
Выходные данные: Единственная строка входного потока содержит три целых
числа a, b, n перечисленные через пробел (каждое число не превосходит по модулю1018).
Выведите в выходной поток слово"Divisibles”, если между
a и b больше чисел делящихся на n, "Indivisibles", если больше
неделящихся, или "Equal", если их одинаковое количество.
Пример входного файла (input.txt):
1 4 2
Пример выходного файла (output.txt):
Equal
program chego_bolshe;
var
A,B,N, I,uch,uchn : integer;
begin
Assign (input,'input.txt');
Reset (input);
read (A, B,N);
uch:=0;
uchn:=0;
for I:=A to B do
if I mod N =0 then uchn:=uchn+1 else uch:=uch+1;
Assign (output,'output.txt');
Rewrite(output);
if uchn>uch then write
('Divisibles') else
if uchn<uch then write ('Indivisibles') else write ('Equal');
Close (input);
Close (output);
end.
Немає коментарів:
Дописати коментар