Warning: Illegal string offset 'html' in /var/www/lvp37/data/www/lvp37.ru/cache/skin_cache/cacheid_1/skin_topic.php on line 909
Делители натурального числа - олимпиадники-информатики

Перейти к содержимому


- - - - -

Делители натурального числа


В этой теме нет ответов

#1 yanush

    Пользователь

  • Пользователи
  • PipPip
  • 22 сообщений

Отправлено 22 December 2011 - 13:08

Условие: Найти все делители числа N
Ограничения: 1 <= N <= 109
Ввод: В первой строке находится число N.
Вывод: В каждой строке вывести по одному числу в порядке возрастания.
Примеры
Ввод 1
6
Вывод 1
1 6
2 3
var n:longint;
procedure del(x:longint);
  var d,s:longint;
   begin
  
	d:=1;
  
	while d*d<x do
	begin
  	if x mod d = 0 then writeln(d,' ',(x div d));
  	d:=d+1;
	end;
  
	if d*d =x then write(d);
    
   end;
    
begin
 
  readln(n);
  del(n);
end.


#2 StepPemia

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
  • ГородDuverge

Отправлено 08 March 2020 - 23:29

Order Discount Worldwide Acticin Tucson Buy Cialis Cataflam Zithromax generic cialis Cialis 20 Prix Discount

#3 StepPemia

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
  • ГородDuverge

Отправлено 08 March 2020 - 23:29

Buy Zithromax In Uk Buy Cialis Cialis Et Viagra En Ligne Buy Cialis Cash On Delivery Isotretinoin 10mg

#4 StepPemia

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
  • ГородDuverge

Отправлено 10 March 2020 - 06:26

Amoxil 500 Mg Dosage Buy Cialis Cialis Lilly Beipackzettel Cialis What Happened To Alli

#5 StepPemia

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
  • ГородDuverge

Отправлено 10 March 2020 - 06:27

Viagra Venta Galicia Buy Cialis Propecia Portugal Receta Medica Buy Cialis Cialis 5 Mg Avis D'Utilisateurs

#6 StepPemia

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
  • ГородDuverge

Отправлено 10 March 2020 - 16:40

Venta Viagra Valencia cialis Cialis In Deutschland Kaufen Buy Cialis Propecia United Pharmacies

#7 StepPemia

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
  • ГородDuverge

Отправлено 10 March 2020 - 16:40

Amoxicillin Fish Tank Buy Cialis Pharmacy Express Buy Cialis Bestellen Online Viagra





Количество пользователей, читающих эту тему: 1

0 пользователей, 1 гостей, 0 анононимных