Паскаль
ЗАДАЧА 1
Найти и вывести на экран все чётные числа из промежутка от 30 до 48

ЗАДАЧА 2
Найти и вывести на экран числа кратные 3 из промежутка от 30 до 55

Четный - нацело делится на 2, кратный трем - нацело делится на 3.Самый простой алгоритм, который приходит в голову - дурацкий. Перебираем все числа и проверяем каждое, подходит ли оно. Гораздо проще взять первое подходящее число из заданного диапазона, а потом идти от него с шагом, равным 2 или 3 (смотря чему нужна кратность).// PascalABC.NET 3.2, сборка 1341 от 20.11.2016begin  Range(30,48,2).Println; // 1-я задача  Range(30,55,3).Println  // 2-я задачаend.Результат30 32 34 36 38 40 42 44 46 4830 33 36 39 42 45 48 51 54