Найти сумму квадратов натуральных чисел от 1 не превышающую заданное число W. Задачу решить в двух вариантах: циклом с условием продолжения и циклом с условием завершения. ( Pascal ABC) Скриншот прилагается, вроде программу написал, но почему-то она не правильно работает.