Составьте блок-схему алгоритма и программу вывода на экран всех трехзначных чисел, кратных 7 - Turbo Pascal (31229)

Формулировка задачи:

Помогите пожааааалуйста 1. Составьте блок-схему алгоритма и программу вывода на экран всех трехзначных чисел, кратных 7. 2. Составьте блок-схему алгоритма и программу вычисления суммы всех трехзначных чисел, кратных 13. 3. Составьте программу вывода на экран таблицы степеней 2n, где 0< n < 10.

Решение задачи: «Составьте блок-схему алгоритма и программу вывода на экран всех трехзначных чисел, кратных 7»

Листинг программы

var i:integer;
begin
    for i:=100 to 999 do
        if (i mod 7=0) then write(i,' ');
end.

Объяснение кода листинга программы

В данном коде используется цикл for, который проходит по всем числам от 100 до 999. Внутри цикла проверяется условие: если число i кратно 7 (mod 7=0), то оно выводится на экран с пробелом после него. Вот список действий в коде по порядку:

Объявляется переменная i типа integer.
Запускается цикл for, который проходит по числам от 100 до 999.
Внутри цикла проверяется условие: если число i кратно 7 (mod 7=0), то оно выводится на экран с пробелом после него.
Если условие выполняется, то число i выводится на экран с пробелом после него.
Цикл завершается.
Программа заканчивается.