• Вопрос по информатике:

    СРОЧНО!!!!!!!!!! ПОМОГИТЕ!

    составить блок-схему нахождения всех делителей числа N. То есть вводим какое-то число N и программа выводит все целые числа, на которые это число делится.

    • Автор:

      luna6
  • 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 Var   k,N, i: longint; Begin   write('Введите N: ');   readln(n);   i:=1; k:=0;   While (i<=N) do     If (N mod i = 0) then       begin         write(i,' ');         inc(i);         inc(k);       end     else       inc(i);   if k=2 then     writeln('Число простое.');   readln; End.

    • Отвечал:

      bunnylhja
    • 0

    Ответов нет, но ты это испарвиш!

Еще 4 ненужных тебе вопроса, но это важно для поиска