Найти количество всех...

Тема в разделе "Информатика", создана пользователем Jack-pot, 1 янв 2010.

  1. Jack-pot

    Jack-pot New Member

    Найти количество всех натуральных чисел, которые удовлетворяют условию 22x+14y=8456
     
  2. Дёнька

    Дёнька New Member

    Program zadacha;
    var   x,y:integer;
    begin 
     for x:=0 to 8456 do begin   
        for y:=0 to 8456 do begin     
            if((x * 22 + y * 14) = 8456) then          
                writeln('x=',x,' y=', y);   
           end;    
      end;
    end.
     

Поделиться этой страницей

Наша группа