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

    Даю 70балов
    язык паскаль решите через вайл плииииз

    Выведите все натуральные делители числа x в порядке возрастания (включая 1 и само число).
    Входные данные
    Вводится натуральное число x
    Выходные данные
    Выведите все делители числа x

    • Автор:

      mercedes3

  • Ответ:

    Program x;

    var

    i , x : integer;

    Begin

    Readln(x);

    I:=1;

    While I <= x do

    Begin

    If x mod I = 0 then

    Writeln(i);

    Inc(I);

    End;

    End.

    • Отвечал:

      faustopdal
    • 0

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

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