Question

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

Answer 1

Ваша программа отрабатывает все правильно. Цикл останавливается, когда sum становится больше заданного W. Выход вижу один: использовать еще одну переменную, которая будет запоминать предыдущее значение sum и печатать его в конце программы

Answer 2

<=

Answer 3

меньше равно

Answer 4

Выводит 1 теперь

Answer 5

сейчас сяду наберу у себя

Answer 6

Сосед, кстати, сделал то же самое, только для остановки цикла он сделал упреждающее условие. Т.е. вычисляется уже следующее значение sum, и если оно больше W, то печатается нынешнее sum