8 класс. Pascal. Решите задачу тремя , с использованием всех трех видов циклов (for, while, repeat). Даны два целых числа А и В (А < В). Найти сумму квадратов всех чисел, кратных 3, расположенных в промежутке от A до B включительно, а также количество N этих чиселожалуйста