Найти 15 первых натуральных чисел, делящихся нацело на 19 и находящихся в интервале, левая граница которого равна 100. можно в виде

var c, y: integer;

begin

   y:= 100;

   c:= 0;

   repeat

       if y mod 19 = 0 then begin

           writeln(y);

           inc(c);

       end;

       inc(y);

   until c = 15;

end.

Задание 1:

ответ: 1

Объяснение:

a=26          - a равна 26b=6            - b равна 6b=a//b        - b равна целой части от деления a на b

                              (26=6*4+2) = 4

с=a%(b+1)   - с равна остатку от деления a на b+1  (26=5*5+1) = 1Задание 2:

ответ: 28

Объяснение:

a=26          - a равна 28b=6            - b равна 7b=a%b       - b равна остатку от деления a на b (28%7 = 0)с=a//(b+1)   - с равна целой части от деления a на b+1

                            (28//1 = 28)

Задание 3:

ответ: 8

Объяснение:

a=-37         - a равна -37b=5            - b равна 5с=a%b +b  - с равна (остатку от деления a на b) + b:

                            c = (-37%5) + 5 = 3 + 5 = 8

Задание 4:

ответ: 6

Объяснение:

a=24         - a равна 24b=5           - b равна 5b=a//b       - b равна целой части от деления a на b (24//5 = 4)c=a//b       - с равна целой части от деления a на b (24//4 = 6)Задание 5:

ответ: 5

Объяснение:

a=-45          - a равна -45b=6             - b равна 6b=a%b +4   - b равна (остатку от деления a на b) + 4:

                              b = (-45%6) +4 = 3 + 4 = 7

c=a%b +1    - с равна (остатку от деления a на b) + 1:

                              c = (-45%7) +1 = 4 + 1 = 5

Задание 6:

ответ: 3

Объяснение:

Если первое введённое число меньше 10, а второе больше, то "ДА".

Таких пар у нас 3: (1; 12), (-11; 12), (-12; 11)

Задание 1:

ответ: 1

Объяснение:

a=26          - a равна 26b=6            - b равна 6b=a//b        - b равна целой части от деления a на b

                              (26=6*4+2) = 4

с=a%(b+1)   - с равна остатку от деления a на b+1  (26=5*5+1) = 1Задание 2:

ответ: 28

Объяснение:

a=26          - a равна 28b=6            - b равна 7b=a%b       - b равна остатку от деления a на b (28%7 = 0)с=a//(b+1)   - с равна целой части от деления a на b+1

                            (28//1 = 28)

Задание 3:

ответ: 8

Объяснение:

a=-37         - a равна -37b=5            - b равна 5с=a%b +b  - с равна (остатку от деления a на b) + b:

                            c = (-37%5) + 5 = 3 + 5 = 8

Задание 4:

ответ: 6

Объяснение:

a=24         - a равна 24b=5           - b равна 5b=a//b       - b равна целой части от деления a на b (24//5 = 4)c=a//b       - с равна целой части от деления a на b (24//4 = 6)Задание 5:

ответ: 5

Объяснение:

a=-45          - a равна -45b=6             - b равна 6b=a%b +4   - b равна (остатку от деления a на b) + 4:

                              b = (-45%6) +4 = 3 + 4 = 7

c=a%b +1    - с равна (остатку от деления a на b) + 1:

                              c = (-45%7) +1 = 4 + 1 = 5

Задание 6:

ответ: 3

Объяснение:

Если первое введённое число меньше 10, а второе больше, то "ДА".

Таких пар у нас 3: (1; 12), (-11; 12), (-12; 11)