С клавиатуры вводится целое положительное число N. Необходимо вычислить сумму натуральных четных чисел, не превышающих N. Составьте программу на языке Pascal, используя цикл с предусловием. Скопируйте текст программы в окно для ответа.