Составить программу нахождения суммы четных чисел начиная с 1 до 100. QBasic

CLS
FOR I = 1 TO 100
IF I MOD 2 = 0 THEN
K=K+I
END IF
NEXT I
PRINT K

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.