Кратните на M и N, които са в интервала от 1 до 100

Публикувано на 18 април, сряда от Данаил

Да се отпечатат всички цели числа в интервала от 1 до 100 които са кратни на целите числа M и N.

Публикувано в 9в с етикети . Постоянна връзка.

One Response to Кратните на M и N, които са в интервала от 1 до 100

  1. Lubomir Dizela каза:
    18 април, сряда в 19:20 
     program Project1;
   var
   i, x, y: integer;

begin

    Write('Vuvedete stoinosti za delene ');
    ReadLn(x, y);
    For i:= 1 to 100 do
    If (i mod x=0) and (i mod y=0) then Write(i, ' ');
    ReadLn;


end.

Вашият коментар