Трицифрени числа със сума на цифрите K

Да се отпечатат всички трицифрени числа, сумата от цифрите на които е равна на предварително зададено число K.

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

Един коментар по Трицифрени числа със сума на цифрите K

  1. Данаил каза:
    program Project1;
    var
      k, c1, c2, c3: integer;
    begin
      Write('vavedete k:');
      ReadLn(k);
      for c1:= 1 to 9 do
        for c2:= 0 to 9 do
          for c3:= 0 to 9 do
            if c1 + c2 + c3 = k then
              WriteLn(c1, c2, c3);
      ReadLn;
    end. 
    

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